Details

analyze6.9s (4.6%)

Algorithm

1×

Search

Probability	Valid	Unknown	Precondition	Infinite	Domain	Can't	Iter
0%	0%	99.8%	0.2%	0%	0%	0%	0
0%	0%	99.8%	0.2%	0%	0%	0%	1
0%	0%	99.8%	0.2%	0%	0%	0%	2
0%	0%	99.8%	0.2%	0%	0%	0%	3
0%	0%	99.8%	0.2%	0%	0%	0%	4
0%	0%	99.8%	0.2%	0%	0%	0%	5
0%	0%	99.8%	0.2%	0%	0%	0%	6
0%	0%	99.8%	0.2%	0%	0%	0%	7
0%	0%	99.8%	0.2%	0%	0%	0%	8
0%	0%	99.8%	0.2%	0%	0%	0%	9
0%	0%	99.8%	0.2%	0%	0%	0%	10
0.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)

sample50.4s (33.6%)

Results

18.8s	1698×	body	4096	valid
10.4s	1406×	body	2048	valid
8.6s	1693×	body	1024	valid
6.9s	93×	body	8192	exit
3.3s	2719×	body	256	valid
2.4s	740×	body	512	valid

Bogosity

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

simplify67.0ms (0%)

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

eval11.0ms (0%)

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

prune136.0ms (0.1%)

Pruning

6 alts after pruning (6 fresh and 0 done)

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

Accurracy

17.9%

Counts

6 → 5

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	15.4%	(.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)))))))))
▶	10.7%	(.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.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)))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
▶	13.4%	(.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)))
▶	16.1%	(.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 1710 to 1160 computations (32.2% saved)

localize715.0ms (0.5%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	65.8%	(/.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))))))))
✓	64.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)))))
✓	59.5%	(cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))
✓	58.7%	(sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))

Compiler

Compiled 1463 to 888 computations (39.3% saved)

series285.0ms (0.2%)

Counts

4 → 144

Calls

36 calls:

Time	Variable		Point	Expression
37.0ms	angle	@	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)))))
36.0ms	x-scale	@	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)))))
26.0ms	y-scale	@	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))))))))
12.0ms	b	@	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))))))))
11.0ms	y-scale	@	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)))))

rewrite139.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
(sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))
(cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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 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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (neg.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))))) (sqrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))))) (cbrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))))) (cbrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) 3) (pow.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))) 3)) (+.f64 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (+.f64 (.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))))) (/.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (/.f64 1 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))))))) (sqrt.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))))))) (cbrt.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))))))) (cbrt.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))))) (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))))))) (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.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>) ((sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (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.3s (0.9%)

Algorithm

1×	egg-herbie

Rules

1278×	`+-commutative`
1066×	`associate-*r/`
920×	`*-commutative`
896×	`associate-*l/`
622×	`associate-+r+`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	1221	235181
1	4764	235177

Stop Event

1×	node limit

Counts

185 → 298

Calls

Call 1

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

Outputs
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (.f64 1/180 angle) (PI.f64))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (.f64 1/180 (.f64 angle (PI.f64))))
(fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)) (.f64 (*.f64 1/180 angle) (PI.f64)))
(+.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 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
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 (.f64 1/180 angle) (PI.f64)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(-.f64 (/.f64 (.f64 (pow.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 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 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 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (.f64 (.f64 a a) (-.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 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b))))))
(-.f64 (+.f64 (.f64 -1/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 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (pow.f64 a 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 (.f64 a a) (-.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 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))))
(-.f64 (+.f64 (.f64 1/4 (.f64 (/.f64 (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 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 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (/.f64 (-.f64 (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 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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))))) (.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 a 6))))) (fma.f64 -1/2 (.f64 (.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 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (pow.f64 a 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 (.f64 a a) (-.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 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))))
(-.f64 (fma.f64 1/4 (/.f64 (.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 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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))))) (.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 a 6)))) (fma.f64 -1/2 (.f64 (.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 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (pow.f64 a 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 (.f64 a a) (-.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 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 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 (.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 (/.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))) (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 (/.f64 (.f64 (pow.f64 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))))
(+.f64 (.f64 (.f64 a a) (-.f64 (-.f64 (/.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))) (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 (.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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))))
(-.f64 (+.f64 (.f64 -1/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 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (.f64 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))
(-.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 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (.f64 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 (/.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))) (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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))
(-.f64 (+.f64 (.f64 -1/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 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (.f64 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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.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 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (.f64 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2)) (pow.f64 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))))
(-.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 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (.f64 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 (/.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))) (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 1/4 (/.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (.f64 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (/.f64 (.f64 (pow.f64 a 4) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))))) (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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 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 (.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 (/.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))) (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 (/.f64 (.f64 (pow.f64 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))))
(+.f64 (.f64 (.f64 a a) (-.f64 (-.f64 (/.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))) (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 (.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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))))
(-.f64 (+.f64 (.f64 -1/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 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (.f64 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))
(-.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 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (.f64 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 (/.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))) (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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))
(-.f64 (+.f64 (.f64 -1/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 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (.f64 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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.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 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (.f64 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2)) (pow.f64 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))))
(-.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 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (.f64 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 (/.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))) (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 1/4 (/.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (.f64 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (/.f64 (.f64 (pow.f64 a 4) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))))) (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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 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 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.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/2 (/.f64 (fma.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 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.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/2 (/.f64 (fma.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 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (.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 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.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/2 (/.f64 (fma.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 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 x-scale x-scale)) (/.f64 (.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 y-scale y-scale))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.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 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 angle angle) (-.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 (pow.f64 (PI.f64) 2) (.f64 b b))) (.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/2 (/.f64 (fma.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 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (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 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-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 x-scale x-scale)) (/.f64 (.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (+.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) 2))) (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 (pow.f64 (PI.f64) 2) (.f64 b b))) (.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 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 x-scale x-scale)) (/.f64 (.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.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/2 (/.f64 (fma.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 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 x-scale x-scale)) (/.f64 (.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 y-scale y-scale))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.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 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (+.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) 2))) (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 (pow.f64 (PI.f64) 2) (.f64 b b))) (.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 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 x-scale x-scale)) (/.f64 (.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.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/2 (/.f64 (fma.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 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (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 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-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 x-scale x-scale)) (/.f64 (.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (sqrt.f64 (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (sqrt.f64 (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (sqrt.f64 (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (sqrt.f64 (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 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 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 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.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))))))) (/.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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.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 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 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 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 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.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))))))) (/.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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.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 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 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 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 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.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))))))) (/.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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.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 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 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 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 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.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))))))) (/.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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.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 (.f64 (pow.f64 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 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 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 (.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))))
(-.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -8 (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 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 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 -1/2 (.f64 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))))))) 2))) (pow.f64 b 4)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))))
(+.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -8 (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (.f64 -1/2 (.f64 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -8 (.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))) (pow.f64 b 4))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 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 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (/.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))))))) 2)) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 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 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))))) (pow.f64 b 6))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 -1/2 (.f64 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))))))) 2))) (pow.f64 b 4)))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))))
(-.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -8 (.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/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 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -8 (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 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 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -8 (.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 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 -1/2 (.f64 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -8 (.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))) (pow.f64 b 4)))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 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 (.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 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))))
(-.f64 (+.f64 (.f64 (pow.f64 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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 (.f64 1/2 (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))))))))
(-.f64 (fma.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 (.f64 1/2 (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (*.f64 y-scale y-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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.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))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))) 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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))))))))
(+.f64 (fma.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.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))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.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 (.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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (*.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 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))) (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.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))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))) 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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))))))))
(-.f64 (fma.f64 1/4 (/.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 y-scale y-scale))))) 2)))) (/.f64 (.f64 (pow.f64 b 4) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 y-scale y-scale)))))) (+.f64 (fma.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.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))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.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 (.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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (*.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 (.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 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))))
(-.f64 (+.f64 (.f64 (pow.f64 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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 (.f64 1/2 (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))))))))
(-.f64 (fma.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 (.f64 1/2 (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (*.f64 y-scale y-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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.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))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))) 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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))))))))
(+.f64 (fma.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.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))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.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 (.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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (*.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 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))) (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.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))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))) 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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))))))))
(-.f64 (fma.f64 1/4 (/.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 y-scale y-scale))))) 2)))) (/.f64 (.f64 (pow.f64 b 4) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 y-scale y-scale)))))) (+.f64 (fma.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.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))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.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 (.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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (*.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 (.f64 1/180 angle) (PI.f64))) 2))) (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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 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 (.f64 1/180 angle) (PI.f64))) 2))) (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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 -1/2 (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (/.f64 (.f64 -1/2 (.f64 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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 -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 (.f64 1/180 angle) (PI.f64))) 2))) (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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (fma.f64 -1/2 (/.f64 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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/4 (.f64 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2)) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2)) (/.f64 (.f64 (pow.f64 y-scale 4) (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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))))))))
(fma.f64 -1 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (fma.f64 -1/2 (/.f64 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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 1/4 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2))) (/.f64 (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2)) (.f64 (pow.f64 y-scale 4) (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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 -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 (.f64 1/180 angle) (PI.f64))) 2))) (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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (fma.f64 1/2 (/.f64 (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))) (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2)) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2) (.f64 -1/4 (/.f64 (.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2))))))) (fma.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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/4 (.f64 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2)) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2)) (/.f64 (.f64 (pow.f64 y-scale 4) (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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)))))))))
(fma.f64 -1 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (fma.f64 1/2 (/.f64 (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))) (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2)) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2) (/.f64 (.f64 -1/4 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))))))))) (fma.f64 -1/2 (/.f64 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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 1/4 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2))) (/.f64 (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2)) (.f64 (pow.f64 y-scale 4) (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 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 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))
(-.f64 (+.f64 (.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (/.f64 (.f64 -1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (*.f64 1/180 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 y-scale 4))) (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))
(+.f64 (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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)))) 1/2) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 y-scale 4))) (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (/.f64 (.f64 -1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 y-scale 4))) (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 1/4 (.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (pow.f64 y-scale 6)) (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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)))) 1/2) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 y-scale 4))) (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (/.f64 (.f64 1/4 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2))) (/.f64 (.f64 (.f64 (pow.f64 y-scale 6) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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 -1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 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 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))
(-.f64 (+.f64 (.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))
(-.f64 (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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)))) 1/2) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 y-scale 4))) (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))
(-.f64 (+.f64 (.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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 y-scale 4))) (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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))) (fma.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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (/.f64 (.f64 (.f64 (pow.f64 y-scale 6) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))
(+.f64 (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 y-scale 4))) (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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))) (fma.f64 1/4 (.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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)))) 1/2) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)) (pow.f64 y-scale 6)) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))
(.f64 -1 (/.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)))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.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 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (neg.f64 (/.f64 (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))))
(+.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 -1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (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)))) (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))))
(+.f64 (/.f64 (.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 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (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)))) (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 -1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (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)))) (fma.f64 1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (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 (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (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)))) (fma.f64 1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (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 (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (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 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))))
(.f64 -1 (/.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 (.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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 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 (.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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 x-scale x-scale)) (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 x-scale 4)))))
(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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 x-scale x-scale)) (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 x-scale 4)))))
(+.f64 (.f64 -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 (.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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 x-scale x-scale)) (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 x-scale 4))) (.f64 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 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (/.f64 (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 3)) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (*.f64 a a)) 2)))))))))))
(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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 x-scale x-scale)) (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 x-scale 4))) (.f64 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 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (/.f64 (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 3)) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (*.f64 a a)) 2))))))))))
(+.f64 (.f64 -1 (/.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 (.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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 x-scale x-scale)) (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 x-scale 4))) (fma.f64 1/2 (/.f64 (fma.f64 -1/4 (/.f64 (.f64 (.f64 (fma.f64 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 4)) (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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 x-scale 8))) (.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 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (/.f64 (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 3)) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (*.f64 a a)) 2))))))))))))
(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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 x-scale x-scale)) (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 x-scale 4))) (fma.f64 1/2 (/.f64 (fma.f64 -1/4 (/.f64 (.f64 (.f64 (fma.f64 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 4)) (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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 x-scale 8))) (.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 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (/.f64 (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 3)) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (*.f64 a a)) 2)))))))))))
(.f64 -1 (/.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 (.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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 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 (.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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 x-scale x-scale)) (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 x-scale 4)))))
(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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 x-scale x-scale)) (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 x-scale 4)))))
(+.f64 (.f64 -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 (.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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 x-scale x-scale)) (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 x-scale 4))) (.f64 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 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (/.f64 (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 3)) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (*.f64 a a)) 2)))))))))))
(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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 x-scale x-scale)) (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 x-scale 4))) (.f64 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 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (/.f64 (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 3)) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (*.f64 a a)) 2))))))))))
(+.f64 (.f64 -1 (/.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 (.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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 x-scale x-scale)) (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 x-scale 4))) (fma.f64 1/2 (/.f64 (fma.f64 -1/4 (/.f64 (.f64 (.f64 (fma.f64 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 4)) (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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 x-scale 8))) (.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 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (/.f64 (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 3)) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (*.f64 a a)) 2))))))))))))
(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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 x-scale x-scale)) (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 x-scale 4))) (fma.f64 1/2 (/.f64 (fma.f64 -1/4 (/.f64 (.f64 (.f64 (fma.f64 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 4)) (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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 x-scale 8))) (.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 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (/.f64 (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 3)) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (*.f64 a a)) 2)))))))))))
(.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.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 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 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 (.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))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (.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 b 4) (.f64 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (/.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 (.f64 x-scale x-scale) (.f64 b b)) (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (.f64 b b) (.f64 (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 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.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))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (.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 b 4) (.f64 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (/.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 (.f64 x-scale x-scale) (.f64 b b)) (cos.f64 (.f64 (*.f64 1/180 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 -1/2 (/.f64 (.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 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (pow.f64 b 4)) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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))))))) (/.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 (.f64 x-scale x-scale) (.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))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (.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 b 4) (.f64 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (/.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 (.f64 x-scale x-scale) (.f64 b b)) (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (.f64 b b) (.f64 (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 (.f64 (.f64 -1/2 (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 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (pow.f64 b 4)) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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))))))) (/.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 (.f64 x-scale x-scale) (.f64 b b)) (cos.f64 (.f64 (.f64 1/180 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 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.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))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (.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 b 4) (.f64 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (/.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 (.f64 x-scale x-scale) (.f64 b b)) (cos.f64 (.f64 (.f64 1/180 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 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (.f64 (/.f64 (-.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 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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)))))) (/.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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))))))))) (neg.f64 (/.f64 (fma.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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))))))) (/.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 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 (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))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (.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 b 4) (.f64 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (/.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 (.f64 x-scale x-scale) (.f64 b b)) (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 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (pow.f64 b 4)) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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))))))) (/.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 (.f64 x-scale x-scale) (.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))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (.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 b 4) (.f64 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (/.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 (.f64 x-scale x-scale) (.f64 b b)) (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (.f64 b b) (.f64 (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 (.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 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))))) (/.f64 (.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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))))) (.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 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 (fma.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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))))))) (/.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 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 (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))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (.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 b 4) (.f64 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (/.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 (.f64 x-scale x-scale) (.f64 b b)) (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 (.f64 (.f64 -1/2 (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 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (pow.f64 b 4)) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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))))))) (/.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 (.f64 x-scale x-scale) (.f64 b b)) (cos.f64 (.f64 (.f64 1/180 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 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.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))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (.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 b 4) (.f64 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (/.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (+.f64 (/.f64 (.f64 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 (.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 (.f64 x-scale x-scale) (.f64 b b)) (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) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (/.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))) (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 (.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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (.f64 b b)))) (.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 (.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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (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))) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (.f64 b b)))) (.f64 a a)) (.f64 -1/2 (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (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 (.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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (.f64 b b)))) (.f64 a a)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 (.f64 1/2 (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.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))))) (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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (.f64 b b))))))) (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 (.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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (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))) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (.f64 b b)))) (.f64 a a)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 (.f64 1/2 (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.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))))) (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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (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))) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (.f64 b b))))))) (pow.f64 a 4)) (.f64 -1/2 (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (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 (.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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (.f64 b b)))) (.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 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (.f64 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))) (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 (.f64 1/180 angle) (PI.f64))) 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 b 4) (.f64 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (.f64 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (neg.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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (.f64 b b))))))))))) (pow.f64 a 6)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 (.f64 1/2 (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.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))))) (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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (.f64 b b))))))) (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 (.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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (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))) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (.f64 b b)))) (.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 (.f64 1/180 angle) (PI.f64))) 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 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (.f64 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (/.f64 (.f64 (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 -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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (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 (.f64 1/180 angle) (PI.f64))) 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 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (.f64 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (.f64 (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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (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))) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (.f64 b b)))))))))) (pow.f64 a 6)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 (.f64 1/2 (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.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))))) (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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (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))) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (.f64 b b))))))) (pow.f64 a 4)) (.f64 -1/2 (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (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) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (/.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))) (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 (.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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (.f64 b b)))) (.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 (.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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (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))) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (.f64 b b)))) (.f64 a a)) (.f64 -1/2 (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (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 (.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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (.f64 b b)))) (.f64 a a)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 (.f64 1/2 (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.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))))) (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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (.f64 b b))))))) (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 (.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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (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))) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (.f64 b b)))) (.f64 a a)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 (.f64 1/2 (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.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))))) (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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (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))) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (.f64 b b))))))) (pow.f64 a 4)) (.f64 -1/2 (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (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 (.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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (.f64 b b)))) (.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 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (.f64 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))) (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 (.f64 1/180 angle) (PI.f64))) 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 b 4) (.f64 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (.f64 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (neg.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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (.f64 b b))))))))))) (pow.f64 a 6)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 (.f64 1/2 (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.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))))) (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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (.f64 b b))))))) (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 (.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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (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))) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (.f64 b b)))) (.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 (.f64 1/180 angle) (PI.f64))) 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 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (.f64 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (/.f64 (.f64 (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 -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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (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 (.f64 1/180 angle) (PI.f64))) 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 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-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 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (.f64 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (.f64 (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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (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))) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (.f64 b b)))))))))) (pow.f64 a 6)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 (.f64 1/2 (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 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 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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.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))))) (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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (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))) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (.f64 b b))))))) (pow.f64 a 4)) (.f64 -1/2 (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (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 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 (.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) (+.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 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.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/2 (/.f64 (fma.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 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.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) (+.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 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.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/2 (/.f64 (fma.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 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.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 x-scale x-scale)) (/.f64 (.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 y-scale y-scale))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.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 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (+.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 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.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/2 (/.f64 (fma.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 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.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 (+.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 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.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/2 (/.f64 (fma.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 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.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 (+.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 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.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/2 (/.f64 (fma.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 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.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 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 x-scale x-scale)) (/.f64 (.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (+.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 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.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/2 (/.f64 (fma.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 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.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 x-scale x-scale)) (/.f64 (.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 y-scale y-scale))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.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 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (+.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 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.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/2 (/.f64 (fma.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 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) 2))) (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 (pow.f64 (PI.f64) 2) (.f64 b b))) (.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 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 x-scale x-scale)) (/.f64 (.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (+.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 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.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/2 (/.f64 (fma.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 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.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 x-scale x-scale)) (/.f64 (.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (+.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 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.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/2 (/.f64 (fma.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 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.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 (+.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 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.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/2 (/.f64 (fma.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 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.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 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 x-scale x-scale)) (/.f64 (.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (+.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 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.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/2 (/.f64 (fma.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 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.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 (+.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 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.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/2 (/.f64 (fma.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 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) 2))) (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 (pow.f64 (PI.f64) 2) (.f64 b b))) (.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 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 x-scale x-scale)) (/.f64 (.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (+.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 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.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/2 (/.f64 (fma.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 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.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 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 x-scale x-scale)) (/.f64 (.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (+.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 (.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 b b))) (.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/2 (/.f64 (fma.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 (pow.f64 (PI.f64) 2) (.f64 b b))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.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 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 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (sqrt.f64 (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (.f64 (-.f64 (.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 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (.f64 (-.f64 (.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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (sqrt.f64 (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (.f64 (-.f64 (.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 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (.f64 (-.f64 (.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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (sqrt.f64 (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (.f64 (-.f64 (.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 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (.f64 (-.f64 (.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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (sqrt.f64 (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (.f64 (-.f64 (.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 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (.f64 (-.f64 (.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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 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 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 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.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))))))) (/.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 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.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 (.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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 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 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 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.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))))))) (/.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 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.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 (.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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 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 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 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.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))))))) (/.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 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.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 (.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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 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 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 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.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))))))) (/.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 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.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 (.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 (pow.f64 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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 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)))))))
(+.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 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 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)))))) (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale)))))) (/.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))) (/.f64 1 (.f64 (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 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 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)))))) (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -8 (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))) (/.f64 1 (.f64 (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 (.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 (.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))))))) 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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))))) (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale)))))) (/.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))) (/.f64 1 (.f64 (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 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 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)))))) (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale)))))) (/.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))) (/.f64 1 (.f64 (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 (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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -8 (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))))) (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -8 (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))) (/.f64 1 (.f64 (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 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 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)))))) (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -8 (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))) (/.f64 1 (.f64 (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 (.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 (.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))))))) 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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))))) (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale)))))) (/.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))) (/.f64 1 (.f64 (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 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 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)))))) (.f64 1/2 (+.f64 (.f64 (pow.f64 b 6) (-.f64 (.f64 (.f64 -1/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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))))))) 2)) (/.f64 (.f64 (.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 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 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))))) (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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))))))) 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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))))) (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale)))))) (/.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))) (/.f64 1 (.f64 (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 (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale)))))) (/.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))) (/.f64 1 (.f64 (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 (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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -8 (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))))) (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -8 (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))) (/.f64 1 (.f64 (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 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 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)))))) (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -8 (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))) (/.f64 1 (.f64 (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 6) (-.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 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -8 (.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 (.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -8 (.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 (.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -8 (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))))) (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -8 (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))) (/.f64 1 (.f64 (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 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 (.f64 1/2 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.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 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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.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 (/.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 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.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 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 y-scale y-scale)))) (.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 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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.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 (/.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 (.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))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-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 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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.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 (/.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 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.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 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 y-scale y-scale)))) (.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 (.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))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.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 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 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 y-scale y-scale)))) (.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)))))
(+.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 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.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))))) (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 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-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 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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.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 (/.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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.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 (/.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 (.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))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-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 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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.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 (/.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 (/.f64 (.f64 1/4 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.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 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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 y-scale y-scale)))))) (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))))) (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 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.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 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 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 y-scale y-scale)))) (.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 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.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 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 y-scale y-scale)))) (.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 (.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))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.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 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 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 y-scale y-scale)))) (.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))))))
(.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 (.f64 1/2 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.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 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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.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 (/.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 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.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 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 y-scale y-scale)))) (.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 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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.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 (/.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 (.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))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-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 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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.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 (/.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 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.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 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 y-scale y-scale)))) (.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 (.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))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.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 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 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 y-scale y-scale)))) (.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)))))
(+.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 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.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))))) (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 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-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 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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.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 (/.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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.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 (/.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 (.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))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-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 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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.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 (/.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 (/.f64 (.f64 1/4 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.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 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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 y-scale y-scale)))))) (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))))) (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 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.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 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 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 y-scale y-scale)))) (.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 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.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 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 y-scale y-scale)))) (.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 (.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))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.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 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 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.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 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 y-scale y-scale)))) (.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))))))
(.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 (.f64 1/180 angle) (PI.f64))) 2))) (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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 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 (.f64 1/180 angle) (PI.f64))) 2))) (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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (-.f64 (.f64 b b) (.f64 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 (.f64 y-scale y-scale) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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 (.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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (-.f64 (.f64 b b) (.f64 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 (/.f64 (.f64 y-scale y-scale) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.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 (.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/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 (.f64 1/180 angle) (PI.f64))) 2))) (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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (-.f64 (.f64 b b) (.f64 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 y-scale y-scale) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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 (.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 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2)) (/.f64 (.f64 (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 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 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 y-scale 4) (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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 -1/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))) (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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (-.f64 (.f64 b b) (.f64 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 (.f64 y-scale y-scale) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.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 (.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 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2)) (/.f64 (.f64 (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 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 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 y-scale 4) (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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 -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 (.f64 1/180 angle) (PI.f64))) 2))) (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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (-.f64 (.f64 b b) (.f64 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 y-scale y-scale) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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 (.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 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 (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2)) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2) (.f64 -1/4 (/.f64 (.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2)) (/.f64 (.f64 (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 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 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 y-scale 4) (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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 -1/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))) (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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (-.f64 (.f64 b b) (.f64 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 (.f64 y-scale y-scale) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.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 (.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 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 (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2)) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2) (/.f64 (.f64 -1/4 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 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 1/8 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2)) (/.f64 (.f64 (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 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 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 y-scale 4) (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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 -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 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 (-.f64 (.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/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 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 (-.f64 (.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 b b) (-.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 (/.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 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 (-.f64 (.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 (.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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 b b) (-.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 (/.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 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 (-.f64 (.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/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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)))) 1/2) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 (-.f64 (.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 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 b b) (-.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 (/.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 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 (-.f64 (.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 (.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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 b b) (-.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 (/.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 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 (-.f64 (.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/8 (.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (pow.f64 y-scale 6)) (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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)))) 1/2) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 (-.f64 (.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 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 b b) (-.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 (/.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 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 (-.f64 (.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 (.f64 1/8 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2))) (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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 -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 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 (-.f64 (.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/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 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 (-.f64 (.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 b b) (-.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 (/.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 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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 (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (*.f64 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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 b b) (-.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 (/.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 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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 (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (.f64 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 (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 b b) (-.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 (/.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 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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 (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (.f64 y-scale y-scale))))))
(fma.f64 1/8 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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)))) 1/2) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)) (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 b b) (-.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 (/.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 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 4 (/.f64 (.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 (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (.f64 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 (.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 (.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 y-scale y-scale)) (/.f64 (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 (.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 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))))) (.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))))) (/.f64 (.f64 -1/2 (fma.f64 (.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 (.f64 a a) (.f64 y-scale y-scale)) (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 (.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 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))))) (/.f64 (.f64 -1/2 (fma.f64 (.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 (.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 y-scale y-scale)) (/.f64 (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 (.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 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))))) (.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.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))))))))) (fma.f64 -1/4 (.f64 (/.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (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))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (/.f64 (.f64 -1/2 (fma.f64 (.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 (.f64 a a) (.f64 y-scale y-scale)) (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 (.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 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.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))))))))) (fma.f64 -1/4 (.f64 (/.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (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))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (/.f64 (.f64 -1/2 (fma.f64 (.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 (.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 (fma.f64 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (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 (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2))) (.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.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)))))))) (fma.f64 1/2 (+.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (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 (.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 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))))) (.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.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))))))))) (fma.f64 -1/4 (.f64 (/.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (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))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (/.f64 (.f64 -1/2 (fma.f64 (.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/8 (.f64 (/.f64 (fma.f64 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (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 (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.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)))))))) (fma.f64 1/2 (+.f64 (/.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (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 (.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 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.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))))))))) (fma.f64 -1/4 (.f64 (/.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (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))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (/.f64 (.f64 -1/2 (fma.f64 (.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 (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 (.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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 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 (.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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 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 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 (-.f64 (.f64 b b) (.f64 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 (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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 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 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 (-.f64 (.f64 b b) (.f64 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 (-.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 (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 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (/.f64 (.f64 (pow.f64 x-scale 6) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 3) (.f64 (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))))) (fma.f64 -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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 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 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 (-.f64 (.f64 b b) (.f64 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 (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 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (/.f64 (.f64 (pow.f64 x-scale 6) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 3) (.f64 (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (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 -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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 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 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 (-.f64 (.f64 b b) (.f64 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 (-.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 (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 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (/.f64 (.f64 (pow.f64 x-scale 6) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 3) (.f64 (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))))) (fma.f64 -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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 4)) (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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (pow.f64 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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 (-.f64 (.f64 b b) (.f64 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 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 (-.f64 (.f64 b b) (.f64 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 (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 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (/.f64 (.f64 (pow.f64 x-scale 6) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 3) (.f64 (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (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 -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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 4)) (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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (pow.f64 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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 (-.f64 (.f64 b b) (.f64 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 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 (-.f64 (.f64 b b) (.f64 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) (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 (.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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 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 (.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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 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 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 (-.f64 (.f64 b b) (.f64 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 (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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 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 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 (-.f64 (.f64 b b) (.f64 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 (-.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 (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 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (/.f64 (.f64 (pow.f64 x-scale 6) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 3) (.f64 (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))))) (fma.f64 -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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 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 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 (-.f64 (.f64 b b) (.f64 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 (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 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (/.f64 (.f64 (pow.f64 x-scale 6) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 3) (.f64 (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (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 -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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 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 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 (-.f64 (.f64 b b) (.f64 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 (-.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 (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 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (/.f64 (.f64 (pow.f64 x-scale 6) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 3) (.f64 (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))))) (fma.f64 -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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 4)) (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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (pow.f64 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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 (-.f64 (.f64 b b) (.f64 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 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 (-.f64 (.f64 b b) (.f64 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 (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 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (/.f64 (.f64 (pow.f64 x-scale 6) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 3) (.f64 (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (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 -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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 4)) (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 4 (/.f64 (.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 y-scale y-scale)) (.f64 (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (pow.f64 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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 (-.f64 (.f64 b b) (.f64 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 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))))))))))))
(.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 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 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (neg.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))))))))
(.f64 1 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))))))))
(.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))))) (sqrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))))))))
(.f64 (.f64 (cbrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))))) (cbrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))))) (cbrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))))))))
(/.f64 (-.f64 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))))) (+.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))))))) (+.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)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) 3) (pow.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))) 3)) (+.f64 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (+.f64 (.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (+.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))))))) (+.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)))))))
(pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))))))))
(log.f64 (exp.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))))))))
(cbrt.f64 (.f64 (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))))))
(expm1.f64 (log1p.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))))))))
(exp.f64 (log.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))))))))
(log1p.f64 (expm1.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))))))))
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))))) (/.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (*.f64 (PI.f64) (/.f64 angle 180)))))))
(.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (/.f64 1 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (*.f64 (PI.f64) (/.f64 angle 180)))))))
(.f64 1 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (*.f64 (PI.f64) (/.f64 angle 180)))))))
(.f64 (sqrt.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))))))) (sqrt.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (*.f64 (PI.f64) (/.f64 angle 180)))))))
(.f64 (.f64 (cbrt.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))))))) (cbrt.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))))))) (cbrt.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (*.f64 (PI.f64) (/.f64 angle 180)))))))
(pow.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (*.f64 (PI.f64) (/.f64 angle 180)))))))
(log.f64 (exp.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (*.f64 (PI.f64) (/.f64 angle 180)))))))
(cbrt.f64 (.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))))) (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))))))) (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (*.f64 (PI.f64) (/.f64 angle 180))))))))))
(expm1.f64 (log1p.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (*.f64 (PI.f64) (/.f64 angle 180)))))))
(exp.f64 (log.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (*.f64 (PI.f64) (/.f64 angle 180)))))))
(log1p.f64 (expm1.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.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 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (*.f64 (PI.f64) (/.f64 angle 180)))))))

localize557.0ms (0.4%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	73.4%	(/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))
✓	59.4%	(cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))
✓	58.7%	(sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))
✓	51.9%	(/.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)

series410.0ms (0.3%)

Counts

4 → 132

Calls

33 calls:

Time	Variable		Point	Expression
30.0ms	b	@	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))))))
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))))))
15.0ms	angle	@	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))))))
13.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))))))
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))))))

rewrite98.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	622
1	1196	622

Stop Event

1×	node limit

Counts

4 → 39

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

simplify736.0ms (0.5%)

Algorithm

1×	egg-herbie

Rules

1282×	`associate-*r/`
1200×	`distribute-lft-in`
1036×	`associate-*l/`
982×	`*-commutative`
932×	`+-commutative`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	1181	117125
1	4572	114953

Stop Event

1×	node limit

Counts

171 → 225

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 1/180 (.f64 angle (PI.f64)))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (.f64 1/180 (.f64 angle (PI.f64))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (+.f64 (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5))) (.f64 -1/30855889612800000000 (.f64 (pow.f64 angle 7) (pow.f64 (PI.f64) 7))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
1
(+.f64 1 (.f64 -1/64800 (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))
(+.f64 1 (+.f64 (.f64 1/25194240000 (.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2)))))
(+.f64 (.f64 -1/24488801280000000 (.f64 (pow.f64 angle 6) (pow.f64 (PI.f64) 6))) (+.f64 1 (+.f64 (.f64 1/25194240000 (.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(+.f64 (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (pow.f64 angle 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))
(+.f64 (.f64 (pow.f64 angle 4) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (.f64 1/4199040000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (.f64 1/12597120000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (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)))) (pow.f64 angle 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))
(+.f64 (.f64 (+.f64 (.f64 1/2040733440000000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 6)) (pow.f64 y-scale 2))) (+.f64 (.f64 -1/12244400640000000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 6)) (pow.f64 y-scale 2))) (+.f64 (.f64 -1/816293376000000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 6)) (pow.f64 y-scale 2))) (.f64 1/1224440064000000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 6)) (pow.f64 y-scale 2)))))) (pow.f64 angle 6)) (+.f64 (.f64 (pow.f64 angle 4) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (.f64 1/4199040000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (.f64 1/12597120000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (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)))) (pow.f64 angle 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-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 y-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 y-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 y-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 y-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 y-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 y-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 y-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 y-scale 2))
(/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.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 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(/.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-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 y-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 y-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 y-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 y-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 y-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 y-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 y-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 y-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 y-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 y-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 y-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 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 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (/.f64 1 (.f64 y-scale y-scale)))
(.f64 1 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)))
(.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))))
(.f64 (.f64 (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)))) (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))))
(pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 1)
(log.f64 (exp.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))))
(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 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (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 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))))
(expm1.f64 (log1p.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))))
(exp.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))))
(log1p.f64 (expm1.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-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 (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 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (.f64 (.f64 b b) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(.f64 1/2 (.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (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)))))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 x-scale (.f64 (.f64 b b) (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)))))))))
(fma.f64 -2 (.f64 (/.f64 a (/.f64 y-scale (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))))) (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 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (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 (-.f64 (/.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 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (.f64 (.f64 b b) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))
(fma.f64 -2 (.f64 (.f64 (/.f64 a y-scale) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (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 1/2 (.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (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)))))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 x-scale (.f64 (.f64 b b) (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)))))))))))))
(fma.f64 -2 (.f64 (/.f64 a (/.f64 y-scale (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))))) (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 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (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 (/.f64 (-.f64 (/.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 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (.f64 (.f64 b b) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 (.f64 a a) (-.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.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 (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 (.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 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) y-scale) (/.f64 (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) x-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))) (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.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 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 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 b 4))))))))))
(fma.f64 -2 (.f64 (.f64 (/.f64 a y-scale) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (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 1/2 (+.f64 (.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (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)))))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 x-scale (.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 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 (/.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 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (+.f64 (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2)) (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) -4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (pow.f64 (.f64 4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-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))))))))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))))) (neg.f64 (.f64 (/.f64 x-scale (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 4)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))))))))))
(+.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 (.f64 (.f64 x-scale (+.f64 (.f64 -8 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) y-scale))) (.f64 -4 (.f64 (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale 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))) (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))))) x-scale))) (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 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (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 b b) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (.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 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (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 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.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 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.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 b b) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.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 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.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 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) (.f64 (.f64 b b) y-scale)))))) (fma.f64 -2 (.f64 (/.f64 a (/.f64 y-scale (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))))) (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 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (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 (/.f64 (-.f64 (/.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 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (.f64 (.f64 b b) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 (.f64 a a) (-.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.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 (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 (.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 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) y-scale) (/.f64 (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) x-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))) (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.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 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 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (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 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (.f64 (/.f64 x-scale (.f64 b b)) (/.f64 (-.f64 (.f64 -8 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.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)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 4 (.f64 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (+.f64 (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2)) (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) -4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (pow.f64 (.f64 4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (/.f64 (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) x-scale)))) 2)) (.f64 (.f64 b b) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) y-scale)) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (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 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (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 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) y-scale)))))) (fma.f64 -2 (.f64 (.f64 (/.f64 a y-scale) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (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 1/2 (+.f64 (.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (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)))))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 x-scale (.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 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 (/.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 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (+.f64 (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2)) (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) -4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (pow.f64 (.f64 4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-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))))))))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))))) (neg.f64 (.f64 (/.f64 x-scale (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 4)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 -1/2 (.f64 (/.f64 x-scale (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 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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))))) (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))))))))
(fma.f64 -2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) (.f64 y-scale a)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(fma.f64 -2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale a)) (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 -1/2 (.f64 (/.f64 x-scale (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 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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))))) (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)))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 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 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale 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))) (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) y-scale)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))))))) (.f64 a a)) (fma.f64 -2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) (.f64 y-scale a)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.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)))) (-.f64 (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (+.f64 (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2)) (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) -4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.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 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.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)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) 2))) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 x-scale (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 -2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale a)) (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 -1/2 (.f64 (/.f64 x-scale (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 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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))))) (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))))))))))
(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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (-.f64 (.f64 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) y-scale) (/.f64 (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) x-scale)) 8) (.f64 (.f64 -4 (/.f64 (-.f64 (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 (.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 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) y-scale)))) 2)) (/.f64 (.f64 y-scale x-scale) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale)))))))) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 y-scale (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale)))))))) (pow.f64 a 3)) (fma.f64 1/2 (/.f64 (-.f64 (neg.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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 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 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale 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))) (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) y-scale)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))))))) (.f64 a a)) (fma.f64 -2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) (.f64 y-scale a)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))))
(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 y-scale y-scale)) (/.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 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (-.f64 (.f64 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-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))))))) 8) (.f64 -4 (.f64 (.f64 (/.f64 (-.f64 (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (+.f64 (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2)) (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) -4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.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 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.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)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) 2)) (.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 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.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 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.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)))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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) y-scale) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (pow.f64 a 3)) (fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.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)))) (-.f64 (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (+.f64 (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2)) (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) -4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.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 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.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)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) 2))) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 x-scale (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 -2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale a)) (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 -1/2 (.f64 (/.f64 x-scale (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 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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))))) (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 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 -1/2 (.f64 (/.f64 x-scale (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 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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))))) (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))))))))
(fma.f64 2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) (.f64 y-scale a)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(fma.f64 2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale a)) (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 -1/2 (.f64 (/.f64 x-scale (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 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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))))) (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)))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 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 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale 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))) (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) y-scale)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))))))) (.f64 a a)) (fma.f64 2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) (.f64 y-scale a)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.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)))) (-.f64 (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (+.f64 (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2)) (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) -4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.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 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.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)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) 2))) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 x-scale (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale a)) (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 -1/2 (.f64 (/.f64 x-scale (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 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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))))) (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))))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 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 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale 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))) (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) y-scale)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))))))) (.f64 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 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (-.f64 (.f64 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) y-scale) (/.f64 (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) x-scale)) 8) (.f64 (.f64 -4 (/.f64 (-.f64 (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 (.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 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) y-scale)))) 2)) (/.f64 (.f64 y-scale x-scale) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale)))))))) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 y-scale (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale)))))))) (pow.f64 a 3)) (fma.f64 2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) (.f64 y-scale a)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.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)))) (-.f64 (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (+.f64 (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2)) (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) -4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.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 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.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)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) 2))) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 x-scale (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (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 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (-.f64 (.f64 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-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))))))) 8) (.f64 -4 (.f64 (.f64 (/.f64 (-.f64 (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (+.f64 (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2)) (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) -4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.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 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.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)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) 2)) (.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 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.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 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.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)))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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) y-scale) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (pow.f64 a 3)) (fma.f64 2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale x-scale)) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale a)) (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 -1/2 (.f64 (/.f64 x-scale (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 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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))))) (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 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 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 x-scale (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.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/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 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 -32400 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (/.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 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 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (fma.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 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)))))))) (PI.f64)))) (.f64 -32400 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (.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 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 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 x-scale (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.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/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 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 -32400 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (/.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)))))))))) (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 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2) (.f64 1/45 (+.f64 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)))) (.f64 (PI.f64) (+.f64 b a))) (.f64 y-scale y-scale))) (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)))) (.f64 (PI.f64) (+.f64 b a))) (.f64 y-scale 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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 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)))))) (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 x-scale (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.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/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 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 -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 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (fma.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 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)))))))) (PI.f64)))) (.f64 -32400 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (.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))))))))) (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 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 y-scale y-scale)) (.f64 a a))) (fma.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (.f64 b b))) (fma.f64 -1/3149280000 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 y-scale y-scale)) (.f64 a a)))))) (-.f64 (+.f64 (pow.f64 (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) 2) (.f64 2 (/.f64 (.f64 1/45 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (+.f64 b a)) (.f64 (PI.f64) (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3))))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (.f64 b b))))) (PI.f64)))) (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 180 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (fma.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 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)))))))) (PI.f64)))) (.f64 -32400 (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000)) (.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))) (.f64 32400 (.f64 (/.f64 x-scale (.f64 (pow.f64 (PI.f64) 2) (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)))) (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 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 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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)))) 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 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-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 (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 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (PI.f64) (+.f64 b a))))))))) (.f64 -1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2) (.f64 1/45 (+.f64 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)))) (.f64 (PI.f64) (+.f64 b a))) (.f64 y-scale y-scale))) (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)))) (.f64 (PI.f64) (+.f64 b a))) (.f64 y-scale 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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2)) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) 2)) (/.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) 2) (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 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 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))))) (PI.f64)))) (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 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 180 (/.f64 x-scale (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.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/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 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 -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 (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)))) (/.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 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 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2) (.f64 1/45 (+.f64 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)))) (.f64 (PI.f64) (+.f64 b a))) (.f64 y-scale y-scale))) (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)))) (.f64 (PI.f64) (+.f64 b a))) (.f64 y-scale 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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 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)))))) (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 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 x-scale (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.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/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 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 -32400 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (/.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))))))))))))))))))))) (fma.f64 1/2 (.f64 angle (+.f64 (.f64 180 (/.f64 x-scale (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.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/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 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 -32400 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (/.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)))))))))) (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 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2) (.f64 1/45 (+.f64 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)))) (.f64 (PI.f64) (+.f64 b a))) (.f64 y-scale y-scale))) (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)))) (.f64 (PI.f64) (+.f64 b a))) (.f64 y-scale 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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 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)))))) (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 x-scale (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.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/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 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 -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 180 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (-.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (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 (.f64 b b) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (.f64 (/.f64 (.f64 a a) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)))) 2)) (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (fma.f64 -1/3149280000 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (.f64 b b))) (fma.f64 -1/3149280000 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (PI.f64) (+.f64 b a)))))))) (/.f64 (.f64 1/2 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (.f64 b b))) (fma.f64 -1/3149280000 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 y-scale y-scale)) (.f64 a a)))))) (-.f64 (+.f64 (pow.f64 (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) 2) (.f64 2 (/.f64 (.f64 1/45 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (+.f64 b a)) (.f64 (PI.f64) (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3))))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2)) (.f64 x-scale x-scale)))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))))) (PI.f64)))) (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))) (.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 180 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (fma.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 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)))))))) (PI.f64)))) (.f64 -32400 (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000)) (.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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (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 (.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 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 y-scale y-scale)) (.f64 a a))) (fma.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (.f64 b b))) (fma.f64 -1/3149280000 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 y-scale y-scale)) (.f64 a a)))))) (-.f64 (+.f64 (pow.f64 (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) 2) (.f64 2 (/.f64 (.f64 1/45 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (+.f64 b a)) (.f64 (PI.f64) (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3))))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (.f64 b b))))) (PI.f64)))) (fma.f64 32400 (.f64 (/.f64 x-scale (.f64 (pow.f64 (PI.f64) 2) (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)))) (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 180 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (.f64 180 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (fma.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 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)))))))) (PI.f64)))) (.f64 -32400 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (.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)))))))))))) (PI.f64)))))))) (fma.f64 1/2 (.f64 angle (+.f64 (.f64 180 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (fma.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 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)))))))) (PI.f64)))) (.f64 -32400 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (.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))))))))) (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 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 y-scale y-scale)) (.f64 a a))) (fma.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (.f64 b b))) (fma.f64 -1/3149280000 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 y-scale y-scale)) (.f64 a a)))))) (-.f64 (+.f64 (pow.f64 (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) 2) (.f64 2 (/.f64 (.f64 1/45 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (+.f64 b a)) (.f64 (PI.f64) (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3))))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (.f64 b b))))) (PI.f64)))) (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 180 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (fma.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 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)))))))) (PI.f64)))) (.f64 -32400 (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000)) (.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))) (.f64 32400 (.f64 (/.f64 x-scale (.f64 (pow.f64 (PI.f64) 2) (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)))) (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 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 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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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 (.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 (pow.f64 (-.f64 b a) 2) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 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 (.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 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.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 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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 (.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 (pow.f64 (-.f64 b a) 2) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 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 (.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 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.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 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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 (.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 (pow.f64 (-.f64 b a) 2) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 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 (.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 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.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 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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 (.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 (pow.f64 (-.f64 b a) 2) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 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 (.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 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.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 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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 (.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 (pow.f64 (-.f64 b a) 2) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 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 (.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 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.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 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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 (.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 (pow.f64 (-.f64 b a) 2) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 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 (.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 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.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 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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 (.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 (pow.f64 (-.f64 b a) 2) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 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 (.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 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.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 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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 (.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 (pow.f64 (-.f64 b a) 2) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 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 (.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 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.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 (PI.f64) (.f64 1/180 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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 a 4)) (.f64 (.f64 y-scale y-scale) (.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 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 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 -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 (PI.f64) (.f64 1/180 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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 a 4)) (.f64 (.f64 y-scale y-scale) (.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 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) (/.f64 y-scale b))) (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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 a 4)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))))
(fma.f64 -1/2 (.f64 (/.f64 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 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (.f64 -2 (.f64 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) y-scale) b) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)))))
(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 (PI.f64) (.f64 1/180 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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 a 4)) (.f64 (.f64 y-scale y-scale) (.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 -2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) (/.f64 y-scale b)) (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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 a 4)) (.f64 (.f64 y-scale y-scale) (.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 (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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) 2) (.f64 -8 (/.f64 (.f64 (.f64 (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 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 a 4)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) y-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)) x-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 x-scale (pow.f64 a 4)) (/.f64 (-.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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 a 4)) (.f64 (.f64 y-scale y-scale) (.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 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 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (fma.f64 -2 (.f64 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) y-scale) b) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (.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 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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (-.f64 (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) 2) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 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 -4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (/.f64 x-scale (pow.f64 a 4)) (/.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 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 (PI.f64) (.f64 1/180 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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 a 4)) (.f64 (.f64 y-scale y-scale) (.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 -2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) (/.f64 y-scale b)) (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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 a 4)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (.f64 1/2 (+.f64 (.f64 (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 a 4)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (.f64 (/.f64 x-scale (.f64 a a)) (/.f64 (+.f64 (.f64 8 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) (.f64 4 (/.f64 (.f64 (.f64 (.f64 (.f64 a a) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.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)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) 2) (.f64 -8 (/.f64 (.f64 (.f64 (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 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 a 4)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) y-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)) x-scale)))) 2)) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale)))))) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 a 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) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 a 4)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))))) (.f64 y-scale x-scale)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (.f64 -4 (.f64 (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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 a 4)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) (.f64 y-scale (.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 (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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) 2) (.f64 -8 (/.f64 (.f64 (.f64 (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 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 a 4)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) y-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)) x-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 x-scale (pow.f64 a 4)) (/.f64 (-.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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 a 4)) (.f64 (.f64 y-scale y-scale) (.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 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 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (fma.f64 -2 (.f64 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) y-scale) b) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (.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 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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (-.f64 (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) 2) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 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 -4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (/.f64 x-scale (pow.f64 a 4)) (/.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (/.f64 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 (.f64 8 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) (.f64 4 (.f64 (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) 2) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 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 -4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale)))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale)))))) y-scale)) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))))))) (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) (.f64 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 x-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))))
(.f64 1/2 (.f64 (/.f64 x-scale (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)))))))
(+.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 x-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))))) (.f64 (.f64 -2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) (.f64 b y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))
(fma.f64 1/2 (.f64 (/.f64 x-scale (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)))))) (.f64 (.f64 -2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) (.f64 b y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (-.f64 (/.f64 (.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 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (-.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)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) 2) (.f64 -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 (.f64 (.f64 4 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) 2))) (/.f64 (.f64 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)))) x-scale)) (neg.f64 (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 b b)) (fma.f64 1/2 (/.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))))) (.f64 (.f64 -2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) (.f64 b y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) 2) (.f64 -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 (.f64 4 (.f64 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.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)))))) 2))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (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 (.f64 x-scale (.f64 a a)) (-.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 b b)) (fma.f64 1/2 (.f64 (/.f64 x-scale (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)))))) (.f64 (.f64 -2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) (.f64 b y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (-.f64 (/.f64 (.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 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (-.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)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) 2) (.f64 -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 (.f64 (.f64 4 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) 2))) (/.f64 (.f64 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)))) x-scale)) (neg.f64 (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 b b)) (fma.f64 1/2 (/.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))))) (fma.f64 -2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) (.f64 b y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 1/2 (+.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (+.f64 (.f64 -8 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) y-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a)) x-scale))) (.f64 -4 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (fma.f64 -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)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) 2) (.f64 -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 (.f64 (.f64 4 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) 2))))) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) (/.f64 y-scale (.f64 a a))))))) (pow.f64 b 3)))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) 2) (.f64 -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 (.f64 4 (.f64 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.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)))))) 2))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (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 (.f64 x-scale (.f64 a a)) (-.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 b b)) (fma.f64 1/2 (.f64 (/.f64 x-scale (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 -2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) (.f64 b y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 1/2 (/.f64 (+.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (+.f64 (.f64 -8 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) (.f64 -4 (.f64 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) (.f64 y-scale x-scale)) (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (fma.f64 -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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) 2) (.f64 -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 (.f64 4 (.f64 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.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)))))) 2)))) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.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)))))))) (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 a a) y-scale) (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))))))) (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 x-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))))
(.f64 1/2 (.f64 (/.f64 x-scale (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)))))))
(+.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 x-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))))) (.f64 (.f64 -2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) (.f64 b y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))
(fma.f64 1/2 (.f64 (/.f64 x-scale (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)))))) (.f64 (.f64 -2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) (.f64 b y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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 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 x-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))))) (fma.f64 1/2 (/.f64 (-.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) 2) (.f64 -8 (/.f64 (.f64 (.f64 (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 (.f64 -4 (.f64 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 b b)) (.f64 (.f64 -2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) (.f64 b y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))
(fma.f64 1/2 (.f64 (/.f64 x-scale (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 (-.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.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 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) 2) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 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 -4 (.f64 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.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)))))) 2))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.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 b b)) (.f64 (.f64 -2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) (.f64 b y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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 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 x-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))))) (fma.f64 -1/2 (/.f64 (+.f64 (.f64 -1/2 (/.f64 (.f64 (.f64 x-scale (+.f64 (/.f64 (.f64 8 (.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 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale)))))) (.f64 y-scale x-scale)) (.f64 4 (.f64 (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) 2) (.f64 -8 (/.f64 (.f64 (.f64 (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 (.f64 -4 (.f64 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))) 2)))) (.f64 y-scale x-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) (/.f64 y-scale (.f64 a a)))))) (pow.f64 b 3)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) 2) (.f64 -8 (/.f64 (.f64 (.f64 (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 (.f64 -4 (.f64 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 b b)) (.f64 (.f64 -2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))) (.f64 b y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))))
(fma.f64 1/2 (.f64 (/.f64 x-scale (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 (+.f64 (.f64 4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 a a) y-scale) (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale)))))) (.f64 -1/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 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (+.f64 (/.f64 (.f64 8 (.f64 (.f64 a a) (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale)))))) (.f64 y-scale x-scale)) (.f64 4 (.f64 (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.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 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) 2) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 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 -4 (.f64 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.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)))))) 2)))) y-scale))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 3)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.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 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) 2) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 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 -4 (.f64 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.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)))))) 2))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.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 b b)) (.f64 (.f64 -2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale))) (.f64 b y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))
(.f64 -1/2 (/.f64 (.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 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -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)))))) (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))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(.f64 -1/2 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.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)))))))))
(fma.f64 -1/4 (/.f64 (.f64 (.f64 x-scale (.f64 y-scale y-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 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -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)))))) (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 (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 (.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 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -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)))))) (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))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))))
(fma.f64 -1/4 (.f64 (/.f64 x-scale (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (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 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.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 (.f64 x-scale (.f64 y-scale y-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 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -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)))))) (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 (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 (.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 -1/2 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -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)))))) (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))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 1/8 (/.f64 x-scale (/.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) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (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)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -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)))))) (.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 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -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)))))) (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 y-scale 4))))))))
(fma.f64 -1/4 (.f64 (/.f64 x-scale (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (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 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/8 (.f64 (/.f64 x-scale (.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 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 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 (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 (pow.f64 y-scale 6) (+.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 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -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)))))) (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 (-.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 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -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)))))) (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 (.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -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)))))) (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -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))))))) (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 (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/4 (/.f64 (.f64 (.f64 x-scale (.f64 y-scale y-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 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -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)))))) (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 (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 (.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 -1/2 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -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)))))) (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))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 1/8 (/.f64 x-scale (/.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) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (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)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -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)))))) (.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 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -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)))))) (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 y-scale 4)))))))))
(fma.f64 1/4 (.f64 (/.f64 x-scale (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 (pow.f64 y-scale 6) (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (-.f64 (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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)) -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 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (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 x-scale (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (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 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/8 (.f64 (/.f64 x-scale (.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 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(.f64 -1/2 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 2 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 1/2 (.f64 (/.f64 x-scale (.f64 y-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 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -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))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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))))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 2 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 1/2 x-scale) (/.f64 (.f64 (.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 (.f64 b b) (.f64 a a))))) (+.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 -1/2 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (fma.f64 -1/4 (/.f64 x-scale (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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 (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 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -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))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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 1/2 (.f64 (/.f64 x-scale (.f64 y-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 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -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))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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)))))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 2 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.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 x-scale (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.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 (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 (-.f64 b a) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))) (/.f64 (.f64 1/2 x-scale) (/.f64 (.f64 (.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 (.f64 b b) (.f64 a a))))) (+.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 -1/2 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (fma.f64 -1/4 (/.f64 x-scale (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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 (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 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -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))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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)))) (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 (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 1/2 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -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))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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/8 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -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)))))) (-.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 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -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))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (pow.f64 y-scale 6) (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 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 2 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.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 x-scale (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.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 (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 (-.f64 b a) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 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 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (/.f64 (.f64 -1/2 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.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 1/8 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 6) (.f64 (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(.f64 -1/2 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 2 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 1/2 (.f64 (/.f64 x-scale (.f64 y-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 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -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))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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))))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 2 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 1/2 x-scale) (/.f64 (.f64 (.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 (.f64 b b) (.f64 a a))))) (+.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 -1/2 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (fma.f64 -1/4 (/.f64 x-scale (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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 (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 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -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))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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 1/2 (.f64 (/.f64 x-scale (.f64 y-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 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -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))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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)))))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 2 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.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 x-scale (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.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 (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 (-.f64 b a) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))) (/.f64 (.f64 1/2 x-scale) (/.f64 (.f64 (.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 (.f64 b b) (.f64 a a))))) (+.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 -1/2 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (fma.f64 -1/4 (/.f64 x-scale (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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 (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 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -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))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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)))) (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 (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 1/2 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -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))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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/8 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -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)))))) (-.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 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -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))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (pow.f64 y-scale 6) (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 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 2 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.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 x-scale (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.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 (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 (-.f64 b a) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 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 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (/.f64 (.f64 -1/2 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.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 1/8 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 6) (.f64 (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (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 (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 x-scale (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 (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 (.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 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 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (/.f64 (.f64 (.f64 b b) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 y-scale y-scale)) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.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 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.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 (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 x-scale (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 x-scale (+.f64 (.f64 (/.f64 (.f64 a a) (.f64 (.f64 y-scale y-scale) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-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 b b) (.f64 a a))))) (.f64 -1/2 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 (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)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 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 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 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (/.f64 (.f64 (.f64 b b) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 y-scale y-scale)) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.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 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.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))))))))) (fma.f64 -1/4 (.f64 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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 b b) (.f64 a a))) (/.f64 (pow.f64 x-scale 3) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (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 (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 x-scale (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 x-scale (+.f64 (.f64 (/.f64 (.f64 a a) (.f64 (.f64 y-scale y-scale) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-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 b b) (.f64 a a))))) (.f64 -1/2 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 (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)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.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 (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) 2)) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (pow.f64 x-scale 3) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.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 (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 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 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 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (/.f64 (.f64 (.f64 b b) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 y-scale y-scale)) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.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 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.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))))))))) (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 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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 (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 (-.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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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)) (pow.f64 x-scale 5)) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.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))))))) (fma.f64 -1/4 (.f64 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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 b b) (.f64 a a))) (/.f64 (pow.f64 x-scale 3) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (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 (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 x-scale (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 x-scale (+.f64 (.f64 (/.f64 (.f64 a a) (.f64 (.f64 y-scale y-scale) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-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 b b) (.f64 a a))))) (.f64 -1/2 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 (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)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))))))) (fma.f64 1/8 (.f64 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 (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)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2))) (.f64 (-.f64 (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) 2)) (pow.f64 x-scale 5))) (fma.f64 -1/4 (.f64 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) 2)) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (pow.f64 x-scale 3) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.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 (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 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 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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))))) (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 x-scale (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 (fma.f64 1/2 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 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 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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))))) (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 x-scale (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 (-.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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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 (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 (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 (fma.f64 1/2 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 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/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 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)) (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (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 -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 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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))))) (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 x-scale (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/4 (/.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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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 (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 (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/8 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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 (pow.f64 x-scale 5) (.f64 (.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)))) (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 (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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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)))))))
(fma.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 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/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 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)) (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (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 1/8 (.f64 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (pow.f64 x-scale 5)) (/.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 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 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)))) (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 3)))))))
(+.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 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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))))) (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 x-scale (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/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 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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 (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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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)) (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 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.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))))) (pow.f64 x-scale 7))) (fma.f64 -1/4 (/.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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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 (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 (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/8 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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 (pow.f64 x-scale 5) (.f64 (.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)))) (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 (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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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))))))))
(fma.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 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/4 (/.f64 (fma.f64 -1/4 (.f64 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 4)) (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.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 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.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 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)) (.f64 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (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))))) (pow.f64 x-scale 7))) (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 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)) (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (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 1/8 (.f64 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (pow.f64 x-scale 5)) (/.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 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 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)))) (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 3))))))))
(.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 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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))))) (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 x-scale (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 (fma.f64 1/2 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 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 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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))))) (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 x-scale (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 (-.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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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 (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 (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 (fma.f64 1/2 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 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/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 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)) (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (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 -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 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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))))) (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 x-scale (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/4 (/.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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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 (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 (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/8 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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 (pow.f64 x-scale 5) (.f64 (.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)))) (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 (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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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)))))))
(fma.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 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/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 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)) (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (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 1/8 (.f64 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (pow.f64 x-scale 5)) (/.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 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 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)))) (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 3)))))))
(+.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 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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))))) (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 x-scale (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/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 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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 (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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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)) (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 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.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))))) (pow.f64 x-scale 7))) (fma.f64 -1/4 (/.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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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 (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 (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/8 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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 (pow.f64 x-scale 5) (.f64 (.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)))) (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 (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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (+.f64 b a) 2))))) (.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))))))))
(fma.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 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/4 (/.f64 (fma.f64 -1/4 (.f64 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 4)) (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.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 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.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 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)) (.f64 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (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))))) (pow.f64 x-scale 7))) (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 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)) (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (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 1/8 (.f64 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (pow.f64 x-scale 5)) (/.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 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 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)))) (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 3))))))))
(.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 1/22674816000000 (.f64 (pow.f64 (PI.f64) 5) (pow.f64 angle 5)))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (+.f64 (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5))) (.f64 -1/30855889612800000000 (.f64 (pow.f64 angle 7) (pow.f64 (PI.f64) 7))))))
(fma.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)) (fma.f64 1/180 (.f64 angle (PI.f64)) (fma.f64 1/22674816000000 (.f64 (pow.f64 (PI.f64) 5) (pow.f64 angle 5)) (.f64 (*.f64 -1/30855889612800000000 (pow.f64 angle 7)) (pow.f64 (PI.f64) 7)))))
(fma.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)) (fma.f64 1/180 (.f64 angle (PI.f64)) (fma.f64 1/22674816000000 (.f64 (pow.f64 (PI.f64) 5) (pow.f64 angle 5)) (.f64 -1/30855889612800000000 (*.f64 (pow.f64 (PI.f64) 7) (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 (pow.f64 (PI.f64) 2) (*.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 (.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))))))
(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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))
(/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))
(.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))
(+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))
(+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))
(+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (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)) (pow.f64 y-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 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))
(+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))
(+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))
(+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (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)) (pow.f64 y-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 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))
(+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))
(+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))
(+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (.f64 a a) (.f64 y-scale 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)))) (pow.f64 angle 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))
(fma.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (.f64 angle angle) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))
(fma.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)))) (.f64 angle angle) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))
(+.f64 (.f64 (pow.f64 angle 4) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (.f64 1/4199040000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (.f64 1/12597120000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (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)))) (pow.f64 angle 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))
(fma.f64 (pow.f64 angle 4) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) 1/3149280000)) (fma.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (.f64 angle angle) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))))
(fma.f64 (pow.f64 angle 4) (fma.f64 -1/3149280000 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 4)) (/.f64 (.f64 (.f64 a a) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4)))) (fma.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)))) (.f64 angle angle) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))
(+.f64 (.f64 (+.f64 (.f64 1/2040733440000000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 6)) (pow.f64 y-scale 2))) (+.f64 (.f64 -1/12244400640000000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 6)) (pow.f64 y-scale 2))) (+.f64 (.f64 -1/816293376000000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 6)) (pow.f64 y-scale 2))) (.f64 1/1224440064000000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 6)) (pow.f64 y-scale 2)))))) (pow.f64 angle 6)) (+.f64 (.f64 (pow.f64 angle 4) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (.f64 1/4199040000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (.f64 1/12597120000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (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)))) (pow.f64 angle 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))
(fma.f64 (fma.f64 1/2040733440000000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 6))) (fma.f64 -1/12244400640000000 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 6))) (fma.f64 -1/816293376000000 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 6))) (/.f64 (.f64 1/1224440064000000 (.f64 (.f64 b b) (pow.f64 (PI.f64) 6))) (.f64 y-scale y-scale))))) (pow.f64 angle 6) (fma.f64 (pow.f64 angle 4) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) 1/3149280000)) (fma.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (.f64 angle angle) (/.f64 (.f64 a a) (*.f64 y-scale y-scale)))))
(fma.f64 (fma.f64 1/2040733440000000 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 6)) (fma.f64 -1/12244400640000000 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 6)) (fma.f64 -1/816293376000000 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 6)) (/.f64 (.f64 1/1224440064000000 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 6)))))) (pow.f64 angle 6) (fma.f64 (pow.f64 angle 4) (fma.f64 -1/3149280000 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 4)) (/.f64 (.f64 (.f64 a a) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4)))) (fma.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)))) (.f64 angle angle) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))
(/.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))
(/.f64 (fma.f64 (.f64 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 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 y-scale y-scale))
(/.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))
(/.f64 (fma.f64 (.f64 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 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 y-scale y-scale))
(/.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))
(/.f64 (fma.f64 (.f64 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 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 y-scale y-scale))
(/.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))
(/.f64 (fma.f64 (.f64 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 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 y-scale y-scale))
(/.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))
(/.f64 (fma.f64 (.f64 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 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 y-scale y-scale))
(/.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))
(/.f64 (fma.f64 (.f64 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 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 y-scale y-scale))
(/.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))
(/.f64 (fma.f64 (.f64 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 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 y-scale y-scale))
(/.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))
(/.f64 (fma.f64 (.f64 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 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 y-scale y-scale))
(/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-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 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))
(+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))
(+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))
(+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))
(/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))
(.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))
(+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))
(+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))
(+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))
(/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))
(.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))
(+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))
(+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))
(+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(/.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))
(/.f64 (fma.f64 (.f64 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 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 y-scale y-scale))
(/.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))
(/.f64 (fma.f64 (.f64 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 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 y-scale y-scale))
(/.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))
(/.f64 (fma.f64 (.f64 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 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 y-scale y-scale))
(/.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))
(/.f64 (fma.f64 (.f64 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 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 y-scale y-scale))
(/.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))
(/.f64 (fma.f64 (.f64 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 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 y-scale y-scale))
(/.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))
(/.f64 (fma.f64 (.f64 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 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 y-scale y-scale))
(/.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))
(/.f64 (fma.f64 (.f64 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 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 y-scale y-scale))
(/.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))
(/.f64 (fma.f64 (.f64 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 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 y-scale y-scale))
(/.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))
(/.f64 (fma.f64 (.f64 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 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 y-scale y-scale))
(/.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))
(/.f64 (fma.f64 (.f64 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 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 y-scale y-scale))
(/.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))
(/.f64 (fma.f64 (.f64 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 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 y-scale y-scale))
(/.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))
(/.f64 (fma.f64 (.f64 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 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 y-scale y-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 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 x-scale x-scale))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale)) 2))) (/.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (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 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale)) 2) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale)) 2))))
(-.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.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 2 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale))))) (/.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 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 (+.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 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (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 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale)) 2) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))))) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale)) 2))))
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale)))))
(.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 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (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 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale)) 2) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))))) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale)) 2))))
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale)))))
(.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 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (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 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale)) 2) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))))) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale)) 2))))
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale)))))
(.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 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (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 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale)) 2) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))))) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale)) 2))))
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale)))))
(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 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (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 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale)) 2) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))))) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale)) 2))))
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale)))))
(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 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (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 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale)) 2) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))))) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale)) 2))))
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale)))))
(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 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (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 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale)) 2) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 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 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (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 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale)) 2) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (-.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 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (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 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale)) 2) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.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 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale))))) (.f64 (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale))))) (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale))))))))
(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 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (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 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale)) 2) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))))) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale)) 2))))
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale)))))
(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 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (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 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale)) 2) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))))) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale)) 2))))
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale)))))
(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 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (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 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale)) 2) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))))) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale)) 2))))
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale)))))
(.f64 1 (sin.f64 (.f64 (*.f64 angle 1/180) (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (sqrt.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (sqrt.f64 (sin.f64 (.f64 (*.f64 angle 1/180) (PI.f64)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (cbrt.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))))) (cbrt.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 1)
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(log.f64 (exp.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cbrt.f64 (.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(cbrt.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))
(cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(expm1.f64 (log1p.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(exp.f64 (log.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(log1p.f64 (expm1.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 1 (cos.f64 (.f64 (*.f64 angle 1/180) (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (sqrt.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (sqrt.f64 (cos.f64 (.f64 (*.f64 angle 1/180) (PI.f64)))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (.f64 (cbrt.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (cbrt.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))))) (cbrt.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 1)
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(log.f64 (exp.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cbrt.f64 (.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))
(cbrt.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(expm1.f64 (log1p.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(exp.f64 (log.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(log1p.f64 (expm1.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (/.f64 1 (.f64 y-scale y-scale)))
(.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 1 (.f64 y-scale y-scale)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (*.f64 y-scale y-scale))
(.f64 1 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 1 (.f64 y-scale y-scale)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (*.f64 y-scale y-scale))
(.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 1 (.f64 y-scale y-scale)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (*.f64 y-scale y-scale))
(.f64 (.f64 (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)))) (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 1 (.f64 y-scale y-scale)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (*.f64 y-scale y-scale))
(pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 1)
(.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 1 (.f64 y-scale y-scale)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (*.f64 y-scale y-scale))
(log.f64 (exp.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 1 (.f64 y-scale y-scale)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (*.f64 y-scale y-scale))
(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 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (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 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))))
(cbrt.f64 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale)) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (*.f64 y-scale y-scale)))))
(cbrt.f64 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (*.f64 y-scale y-scale)))))
(expm1.f64 (log1p.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 1 (.f64 y-scale y-scale)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (*.f64 y-scale y-scale))
(exp.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 1 (.f64 y-scale y-scale)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (*.f64 y-scale y-scale))
(log1p.f64 (expm1.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 1 (.f64 y-scale y-scale)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (*.f64 y-scale y-scale))

localize605.0ms (0.4%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	65.6%	(/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.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))))))
✓	64.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)))))
	59.4%	(cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))
	58.7%	(sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))

Compiler

Compiled 1327 to 803 computations (39.5% saved)

series156.0ms (0.1%)

Counts

2 → 120

Calls

30 calls:

Time	Variable		Point	Expression
13.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))))))
11.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))))))
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))))))
8.0ms	angle	@	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)))))
7.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)))))

rewrite95.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.4s (0.9%)

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

localize813.0ms (0.5%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
	73.4%	(/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))
✓	67.2%	(/.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)))
	59.4%	(cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))
	58.7%	(sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))

Compiler

Compiled 1446 to 883 computations (38.9% saved)

series147.0ms (0.1%)

Counts

1 → 60

Calls

15 calls:

Time	Variable		Point	Expression
27.0ms	x-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))) (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)))
18.0ms	b	@	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))) (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)))
12.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))) (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)))
12.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))) (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)))
11.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))) (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)))

rewrite74.0ms (0%)

Algorithm

1×	batch-egg-rewrite

Rules

1122×	`add-sqr-sqrt`
1106×	`*-un-lft-identity`
1094×	`pow1`
1036×	`add-exp-log`
1036×	`add-log-exp`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	46	527
1	1078	527

Stop Event

1×	node limit

Counts

1 → 12

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

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

simplify725.0ms (0.5%)

Algorithm

1×	egg-herbie

Rules

1284×	`distribute-lft-in`
960×	`associate-*r/`
934×	`*-commutative`
842×	`associate-*l/`
778×	`+-commutative`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	1023	141386
1	4031	140014

Stop Event

1×	node limit

Counts

72 → 132

Calls

Call 1

Inputs
(.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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.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 (.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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.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 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.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 (/.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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/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 (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 -1 (/.f64 (-.f64 (/.f64 (.f64 y-scale (.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)))))))))) 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 (/.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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.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))))))))) (pow.f64 b 2)))))) (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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 (.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 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 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 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)))))))) (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 -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 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 (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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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)))) (pow.f64 a 6))) (+.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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.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 (/.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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/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 (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 -1 (/.f64 (-.f64 (/.f64 (.f64 y-scale (.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)))))))))) 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 (/.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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.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))))))))) (pow.f64 b 2)))))) (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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 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 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (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 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (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 (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 -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 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (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 y-scale (.f64 x-scale (-.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 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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (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 (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 4))) (+.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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (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 (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 -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 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (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/4 (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.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 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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/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 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 (-.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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (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 (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 b 2)))) (pow.f64 a 6))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.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 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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (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 (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 4))) (+.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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (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 (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 -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 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (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 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 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (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 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (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 (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 -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 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (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 y-scale (.f64 x-scale (-.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 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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (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 (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 4))) (+.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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (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 (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 -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 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (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/4 (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.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 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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/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 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 (-.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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (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 (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 b 2)))) (pow.f64 a 6))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.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 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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (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 (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 4))) (+.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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (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 (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 -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 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (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 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 (-.f64 (.f64 180 (/.f64 (.f64 y-scale (.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/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 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 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))))) angle)))
(+.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 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (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 x-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)))))))) y-scale)) (.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)))))) (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/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 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 (-.f64 (.f64 180 (/.f64 (.f64 y-scale (.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/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 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 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))))) angle))))
(+.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 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (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 x-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)))))))) y-scale)) (.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)))))) (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/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/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/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 x-scale y-scale))) (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 x-scale y-scale)))) 2)) (.f64 2/45 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (PI.f64) (+.f64 (.f64 1/22674816000000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (.f64 x-scale y-scale))) (+.f64 (.f64 1/4534963200000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (.f64 x-scale y-scale))) (.f64 1/2267481600000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (.f64 x-scale y-scale))))))) (.f64 x-scale y-scale)))))) (.f64 1/2 (/.f64 (.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 2/45 (/.f64 (.f64 (+.f64 (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale))) (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 y-scale x-scale))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (.f64 (-.f64 (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 (-.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)))))))) y-scale)) (.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 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 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (.f64 y-scale (.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/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 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 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/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (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 (-.f64 (.f64 180 (/.f64 (.f64 y-scale (.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/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 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 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))))) angle)))))
(.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 (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 (pow.f64 b 2) (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 (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 (pow.f64 b 2) (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 (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 (pow.f64 b 2) (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 (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 (pow.f64 b 2) (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 (/.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 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 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 (-.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)))) 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 (.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 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 (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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 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 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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)))))) (+.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 (/.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 -1 (/.f64 (.f64 y-scale (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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)))) 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 (.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 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 (.f64 -1/4 (.f64 (/.f64 (.f64 x-scale (.f64 (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 y-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 (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 y-scale 2) (pow.f64 x-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 x-scale 2) (pow.f64 y-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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 y-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)))) 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 (.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 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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 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 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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)))))) (+.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 (/.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 -1 (/.f64 (.f64 y-scale (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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)))) 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 (.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 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 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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 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))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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 b 2) (pow.f64 (sin.f64 (.f64 1/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 x-scale (.f64 y-scale (+.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))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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/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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 y-scale 5) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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) (.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/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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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 b 2) (pow.f64 (sin.f64 (.f64 1/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 x-scale (.f64 y-scale (+.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))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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))))) 2) (.f64 -1/4 (/.f64 (.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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))))))) (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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/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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 y-scale 5) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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) (.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/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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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 b 2) (pow.f64 (sin.f64 (.f64 1/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 x-scale (.f64 y-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 (cos.f64 (.f64 1/180 (.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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.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)) (.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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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)))))) x-scale) (.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/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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.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 y-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 (cos.f64 (.f64 1/180 (.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)) (.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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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)))))) x-scale) (.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/8 (/.f64 (.f64 x-scale (.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 5) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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) (cos.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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.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 y-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 (cos.f64 (.f64 1/180 (.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)) (.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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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)))))) x-scale) (.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/2 (/.f64 (.f64 x-scale (.f64 y-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 (cos.f64 (.f64 1/180 (.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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.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)) (.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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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)))))) x-scale) (.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/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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.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 y-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 (cos.f64 (.f64 1/180 (.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)) (.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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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)))))) x-scale) (.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/8 (/.f64 (.f64 x-scale (.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 5) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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) (cos.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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.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 y-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 (cos.f64 (.f64 1/180 (.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)) (.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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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)))))) x-scale) (.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/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 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 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))))))) (.f64 (cos.f64 (.f64 1/180 (.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 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 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))))))) (.f64 (cos.f64 (.f64 1/180 (.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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (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/2 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (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 (pow.f64 x-scale 5) (.f64 y-scale (.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 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.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 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 -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 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 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))))))) y-scale) (.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 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 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))))))) y-scale) (.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 b 2) (pow.f64 (cos.f64 (.f64 1/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 (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/8 (/.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 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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 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 (.f64 -1/2 (/.f64 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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))))))) y-scale) (.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 b 2) (pow.f64 (cos.f64 (.f64 1/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 (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 (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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 b 2) (pow.f64 (cos.f64 (.f64 1/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)))))))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 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 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/8 (/.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 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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 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 (.f64 -1/2 (/.f64 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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))))))) y-scale) (.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 b 2) (pow.f64 (cos.f64 (.f64 1/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 (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 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 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))))))) y-scale) (.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 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 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))))))) y-scale) (.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 b 2) (pow.f64 (cos.f64 (.f64 1/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 (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/8 (/.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 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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 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 (.f64 -1/2 (/.f64 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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))))))) y-scale) (.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 b 2) (pow.f64 (cos.f64 (.f64 1/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 (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 (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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 b 2) (pow.f64 (cos.f64 (.f64 1/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)))))))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 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 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/8 (/.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 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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 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 (.f64 -1/2 (/.f64 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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))))))) y-scale) (.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 b 2) (pow.f64 (cos.f64 (.f64 1/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 (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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (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 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale))) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))) (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) 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 (+.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (/.f64 1 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) x-scale))))
(.f64 1 (.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (.f64 (cos.f64 (.f64 (.f64 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 (/.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (.f64 (cos.f64 (.f64 (.f64 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))) (sqrt.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (.f64 (cos.f64 (.f64 (.f64 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 (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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (.f64 (cos.f64 (.f64 (.f64 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))) (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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (.f64 (cos.f64 (.f64 (.f64 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)))) (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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (.f64 (cos.f64 (.f64 (.f64 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 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (.f64 (cos.f64 (.f64 (.f64 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))
(pow.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (.f64 (cos.f64 (.f64 (.f64 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)) 1)
(log.f64 (exp.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (.f64 (cos.f64 (.f64 (.f64 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))))
(cbrt.f64 (.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (.f64 (cos.f64 (.f64 (.f64 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 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (.f64 (cos.f64 (.f64 (.f64 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 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (.f64 (cos.f64 (.f64 (.f64 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))))
(expm1.f64 (log1p.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (.f64 (cos.f64 (.f64 (.f64 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))))
(exp.f64 (log.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (.f64 (cos.f64 (.f64 (.f64 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))))
(log1p.f64 (expm1.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (.f64 (cos.f64 (.f64 (.f64 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))))

Outputs
(.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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.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 x-scale (.f64 b b)) (/.f64 (.f64 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))))) (.f64 (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 (.f64 b b)) (/.f64 (.f64 y-scale (-.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 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 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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.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 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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 (/.f64 x-scale (.f64 b b)) (/.f64 (.f64 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (.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 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))))) (.f64 (.f64 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 x-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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))))) (.f64 (pow.f64 b 4) (.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 x-scale (.f64 b b)) (/.f64 (.f64 y-scale (-.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (.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 (/.f64 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 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 b 4))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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 2 (.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))))) (neg.f64 (.f64 (/.f64 x-scale (pow.f64 b 4)) (/.f64 (.f64 y-scale (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 b 4))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 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 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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.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 (/.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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/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 (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 -1 (/.f64 (-.f64 (/.f64 (.f64 y-scale (.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)))))))))) 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 (/.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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.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))))))))) (pow.f64 b 2)))))) (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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)))))))))))))
(fma.f64 1/2 (.f64 (/.f64 x-scale (.f64 b b)) (/.f64 (.f64 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))))) (.f64 (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 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 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.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 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))) 2))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (.f64 (.f64 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 (/.f64 y-scale (cos.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) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))))) (.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (neg.f64 (/.f64 y-scale (/.f64 (.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 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))))))))) (.f64 b b))))) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (.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 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))))) (.f64 (.f64 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 x-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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))))) (.f64 (pow.f64 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 (/.f64 x-scale (.f64 b b)) (/.f64 (.f64 y-scale (-.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 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 a a) (-.f64 (.f64 (/.f64 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 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 b 4))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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 2 (.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))))) (neg.f64 (.f64 (/.f64 x-scale (pow.f64 b 4)) (/.f64 (.f64 y-scale (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 b 4))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 (pow.f64 a 4) (-.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 (.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 b 4))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (.f64 (/.f64 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 x-scale (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.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 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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 2 (.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) 2)))))) (neg.f64 (/.f64 (-.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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 2 (.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))))) (.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (neg.f64 (.f64 (/.f64 y-scale (.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 x-scale (-.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))))))) (*.f64 b b))))))))
(+.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 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 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 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)))))))) (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 -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 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 (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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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)))) (pow.f64 a 6))) (+.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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.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 (/.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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/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 (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 -1 (/.f64 (-.f64 (/.f64 (.f64 y-scale (.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)))))))))) 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 (/.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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.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))))))))) (pow.f64 b 2)))))) (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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))))))))))))))
(fma.f64 1/2 (.f64 (-.f64 (.f64 1/4 (/.f64 (.f64 (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) 2)) (.f64 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 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (.f64 (.f64 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 (.f64 -1/2 (/.f64 (.f64 (.f64 x-scale y-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 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) 2))) (.f64 (.f64 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (.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 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))))) (.f64 (.f64 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 x-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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))))) (.f64 (pow.f64 b 4) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 b b)))) (.f64 b b)))) (pow.f64 a 6)) (fma.f64 1/2 (.f64 (/.f64 x-scale (.f64 b b)) (/.f64 (.f64 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))))) (.f64 (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 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 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.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 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))) 2))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (.f64 (.f64 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 (/.f64 y-scale (cos.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) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))))) (.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (neg.f64 (/.f64 y-scale (/.f64 (.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 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))))))))) (.f64 b b))))) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (.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 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))))) (.f64 (.f64 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 x-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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))))) (.f64 (pow.f64 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 (-.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 (.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 b 4))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (.f64 (/.f64 x-scale (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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (/.f64 (.f64 (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (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 (.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 b 4))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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 2 (.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) 2)) (.f64 y-scale (+.f64 (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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 2 (.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 -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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (.f64 (/.f64 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 x-scale (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (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 (.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 b 4))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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 2 (.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) 2)))))) (neg.f64 (/.f64 (-.f64 (.f64 (/.f64 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 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 b 4))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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 2 (.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))))) (neg.f64 (.f64 (/.f64 x-scale (pow.f64 b 4)) (/.f64 (.f64 y-scale (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 b 4))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 b b)))) (.f64 b b)))) (pow.f64 a 6)) (fma.f64 1/2 (.f64 (/.f64 x-scale (.f64 b b)) (/.f64 (.f64 y-scale (-.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 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 a a) (-.f64 (.f64 (/.f64 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 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 b 4))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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 2 (.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))))) (neg.f64 (.f64 (/.f64 x-scale (pow.f64 b 4)) (/.f64 (.f64 y-scale (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 b 4))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 (pow.f64 a 4) (-.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 (.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 b 4))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (.f64 (/.f64 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 x-scale (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.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 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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 2 (.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) 2)))))) (neg.f64 (/.f64 (-.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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 2 (.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))))) (.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (neg.f64 (.f64 (/.f64 y-scale (.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 x-scale (-.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))))))) (.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 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (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 x-scale y-scale) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 -1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(+.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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (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 (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 -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 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (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 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 1/2 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (.f64 y-scale (.f64 b b)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (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)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 a a)) (/.f64 (.f64 -1/2 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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))))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 y-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))) (.f64 a a)) (.f64 -1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (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 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.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 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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (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 (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 4))) (+.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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (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 (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 -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 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (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 (.f64 1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) 2))) (sin.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 1/2 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (.f64 y-scale (.f64 b b)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (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)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 a 4)) (fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 1/2 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (.f64 y-scale (.f64 b b)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (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)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 a a)) (/.f64 (.f64 -1/2 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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))))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 y-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))))))) (pow.f64 a 4)) (fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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))))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 y-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))) (.f64 a a)) (.f64 -1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (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 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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/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 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 (-.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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (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 (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 b 2)))) (pow.f64 a 6))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.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 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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (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 (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 4))) (+.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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (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 (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 -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 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (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/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 x-scale (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 y-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 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) 2))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (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 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 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 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) 2))) (sin.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 1/2 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (.f64 y-scale (.f64 b b)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (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)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))) (pow.f64 a 6)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 (.f64 1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) 2))) (sin.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 1/2 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (.f64 y-scale (.f64 b b)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (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)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 a 4)) (fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 1/2 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (.f64 y-scale (.f64 b b)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (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)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 a a)) (/.f64 (.f64 -1/2 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (/.f64 (.f64 -1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 -8 (/.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 b 4))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (neg.f64 (.f64 (.f64 b b) (-.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 b 4))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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))))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 y-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))))))))) (pow.f64 a 6)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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))))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 y-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))))))) (pow.f64 a 4)) (fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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))))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 y-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))) (.f64 a a)) (.f64 -1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.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 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (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 x-scale y-scale) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 -1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(+.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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (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 (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 -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 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (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 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 1/2 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (.f64 y-scale (.f64 b b)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (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)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 a a)) (/.f64 (.f64 -1/2 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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))))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 y-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))) (.f64 a a)) (.f64 -1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (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 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.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 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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (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 (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 4))) (+.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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (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 (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 -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 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (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 (.f64 1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) 2))) (sin.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 1/2 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (.f64 y-scale (.f64 b b)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (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)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 a 4)) (fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 1/2 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (.f64 y-scale (.f64 b b)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (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)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 a a)) (/.f64 (.f64 -1/2 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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))))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 y-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))))))) (pow.f64 a 4)) (fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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))))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 y-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))) (.f64 a a)) (.f64 -1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (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 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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/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 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 (-.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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (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 (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 b 2)))) (pow.f64 a 6))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.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 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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (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 (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 4))) (+.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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (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 (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 -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 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (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/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 x-scale (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 y-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 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) 2))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (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 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 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 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) 2))) (sin.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 1/2 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (.f64 y-scale (.f64 b b)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (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)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))) (pow.f64 a 6)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 (.f64 1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) 2))) (sin.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 1/2 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (.f64 y-scale (.f64 b b)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (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)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 a 4)) (fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 1/2 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (.f64 y-scale (.f64 b b)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (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)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 a a)) (/.f64 (.f64 -1/2 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (/.f64 (.f64 -1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 -8 (/.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 b 4))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (neg.f64 (.f64 (.f64 b b) (-.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 b 4))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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))))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 y-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))))))))) (pow.f64 a 6)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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))))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 y-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))))))) (pow.f64 a 4)) (fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 b b) (.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))))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 y-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))) (.f64 a a)) (.f64 -1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.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 90 (/.f64 (.f64 (.f64 x-scale y-scale) (.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 a) (-.f64 b a))))))
(.f64 90 (.f64 (/.f64 y-scale angle) (/.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))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))
(+.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 (-.f64 (.f64 180 (/.f64 (.f64 y-scale (.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/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 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 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))))) angle)))
(fma.f64 90 (/.f64 (.f64 (.f64 x-scale y-scale) (.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 a) (-.f64 b a))))) (.f64 1/2 (.f64 angle (fma.f64 180 (/.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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.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 (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) (.f64 (PI.f64) (.f64 (+.f64 b a) (-.f64 b a)))) (neg.f64 (.f64 32400 (.f64 (/.f64 y-scale (.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (.f64 x-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))) (pow.f64 (PI.f64) 2)))))))))
(fma.f64 90 (.f64 (/.f64 y-scale angle) (/.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))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 1/2 (.f64 angle (fma.f64 180 (.f64 (/.f64 y-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 x-scale (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))))) (PI.f64))) (neg.f64 (.f64 32400 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 (.f64 y-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) 3) -1/8748000)) (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 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (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 x-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)))))))) y-scale)) (.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)))))) (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/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 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 (-.f64 (.f64 180 (/.f64 (.f64 y-scale (.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/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 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 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))))) angle))))
(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))))) (+.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 (.f64 2/45 (.f64 (.f64 (+.f64 b a) (-.f64 b a)) (.f64 (PI.f64) (.f64 (.f64 (/.f64 (.f64 (+.f64 b a) (-.f64 b a)) y-scale) (/.f64 (pow.f64 (PI.f64) 3) x-scale)) -1/8748000)))) (.f64 x-scale y-scale)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-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 a) (-.f64 b a)))) (fma.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (/.f64 (PI.f64) (fma.f64 180 (/.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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.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 (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) (.f64 (PI.f64) (.f64 (+.f64 b a) (-.f64 b a)))) (neg.f64 (.f64 32400 (.f64 (/.f64 y-scale (.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (.f64 x-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))) (pow.f64 (PI.f64) 2)))))))) (.f64 32400 (.f64 (/.f64 x-scale (.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (.f64 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)))) (pow.f64 (PI.f64) 2))))))) (fma.f64 90 (/.f64 (.f64 (.f64 x-scale y-scale) (.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 a) (-.f64 b a))))) (.f64 1/2 (.f64 angle (fma.f64 180 (/.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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.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 (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) (.f64 (PI.f64) (.f64 (+.f64 b a) (-.f64 b a)))) (neg.f64 (.f64 32400 (.f64 (/.f64 y-scale (.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (.f64 x-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))) (pow.f64 (PI.f64) 2))))))))))
(fma.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (.f64 (/.f64 y-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 x-scale (-.f64 (fma.f64 -1/3149280000 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 y-scale y-scale)) (.f64 a a))) (fma.f64 1/2 (/.f64 (-.f64 (+.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (.f64 b b))) (fma.f64 -1/3149280000 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 y-scale y-scale)) (.f64 a a)))))) (pow.f64 (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 1/32400 (.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)) (.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 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (.f64 b b)))))) (PI.f64)))) (fma.f64 180 (.f64 (/.f64 (fma.f64 180 (.f64 (/.f64 y-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 x-scale (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))))) (PI.f64))) (neg.f64 (.f64 32400 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 (.f64 y-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) 3) -1/8748000)) (pow.f64 (PI.f64) 2)))))) (PI.f64)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 32400 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 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)))) (pow.f64 (PI.f64) 2))))))) (fma.f64 90 (.f64 (/.f64 y-scale angle) (/.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))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 1/2 (.f64 angle (fma.f64 180 (.f64 (/.f64 y-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 x-scale (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))))) (PI.f64))) (neg.f64 (.f64 32400 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 (.f64 y-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) 3) -1/8748000)) (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 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (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 x-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)))))))) y-scale)) (.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)))))) (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/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/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/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 x-scale y-scale))) (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 x-scale y-scale)))) 2)) (.f64 2/45 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (PI.f64) (+.f64 (.f64 1/22674816000000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (.f64 x-scale y-scale))) (+.f64 (.f64 1/4534963200000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (.f64 x-scale y-scale))) (.f64 1/2267481600000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (.f64 x-scale y-scale))))))) (.f64 x-scale y-scale)))))) (.f64 1/2 (/.f64 (.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 2/45 (/.f64 (.f64 (+.f64 (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale))) (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 y-scale x-scale))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (.f64 (-.f64 (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 (-.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)))))))) y-scale)) (.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 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 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (.f64 y-scale (.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/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 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 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/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (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 (-.f64 (.f64 180 (/.f64 (.f64 y-scale (.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/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 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 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))))) angle)))))
(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))))) (+.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 (.f64 2/45 (.f64 (.f64 (+.f64 b a) (-.f64 b a)) (.f64 (PI.f64) (.f64 (.f64 (/.f64 (.f64 (+.f64 b a) (-.f64 b a)) y-scale) (/.f64 (pow.f64 (PI.f64) 3) x-scale)) -1/8748000)))) (.f64 x-scale y-scale)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-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 a) (-.f64 b a)))) (fma.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (/.f64 (PI.f64) (fma.f64 180 (/.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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.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 (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) (.f64 (PI.f64) (.f64 (+.f64 b a) (-.f64 b a)))) (neg.f64 (.f64 32400 (.f64 (/.f64 y-scale (.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (.f64 x-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))) (pow.f64 (PI.f64) 2)))))))) (.f64 32400 (.f64 (/.f64 x-scale (.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (.f64 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)))) (pow.f64 (PI.f64) 2))))))) (fma.f64 1/2 (.f64 (pow.f64 angle 5) (-.f64 (/.f64 (.f64 180 (.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 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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.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 a) (-.f64 b a)) y-scale) (/.f64 (pow.f64 (PI.f64) 3) x-scale)) -1/8748000) 2) (/.f64 (.f64 2/45 (.f64 (.f64 (PI.f64) (.f64 (+.f64 b a) (-.f64 b a))) (fma.f64 1/22674816000000 (.f64 (/.f64 (.f64 (+.f64 b a) (-.f64 b a)) x-scale) (/.f64 (pow.f64 (PI.f64) 5) y-scale)) (.f64 (.f64 (/.f64 (.f64 (+.f64 b a) (-.f64 b a)) x-scale) (/.f64 (pow.f64 (PI.f64) 5) y-scale)) 1/1511654400000)))) (.f64 x-scale y-scale))))) (.f64 -1/2 (/.f64 (fma.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 (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (/.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) 2) (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 2/45 (/.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 b a) (-.f64 b a)) y-scale) (/.f64 (pow.f64 (PI.f64) 3) x-scale)) -1/8748000) (/.f64 (.f64 x-scale y-scale) (.f64 (PI.f64) (.f64 (+.f64 b a) (-.f64 b a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 (PI.f64) (.f64 (+.f64 b a) (-.f64 b a)))) (fma.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)))) (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 a) (-.f64 b a)) (pow.f64 (PI.f64) 2))) (.f64 180 (+.f64 (/.f64 (fma.f64 180 (/.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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.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 (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) (.f64 (PI.f64) (.f64 (+.f64 b a) (-.f64 b a)))) (neg.f64 (.f64 32400 (.f64 (/.f64 y-scale (.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (.f64 x-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))) (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 (fma.f64 180 (.f64 (/.f64 x-scale (.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (.f64 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 a) (-.f64 b a)) y-scale) (/.f64 (pow.f64 (PI.f64) 3) x-scale)) -1/8748000) (/.f64 (.f64 x-scale y-scale) (.f64 (PI.f64) (.f64 (+.f64 b a) (-.f64 b a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-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 180 (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (/.f64 (PI.f64) (fma.f64 180 (/.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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.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 (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) (.f64 (PI.f64) (.f64 (+.f64 b a) (-.f64 b a)))) (neg.f64 (.f64 32400 (.f64 (/.f64 y-scale (.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (.f64 x-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))) (pow.f64 (PI.f64) 2)))))))) (.f64 32400 (.f64 (/.f64 x-scale (.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (.f64 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)))) (pow.f64 (PI.f64) 2))))))) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)))))))) (fma.f64 90 (/.f64 (.f64 (.f64 x-scale y-scale) (.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 a) (-.f64 b a))))) (.f64 1/2 (.f64 angle (fma.f64 180 (/.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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.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 (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) (.f64 (PI.f64) (.f64 (+.f64 b a) (-.f64 b a)))) (neg.f64 (.f64 32400 (.f64 (/.f64 y-scale (.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (.f64 x-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))) (pow.f64 (PI.f64) 2)))))))))))
(fma.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (.f64 (/.f64 y-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 x-scale (-.f64 (fma.f64 -1/3149280000 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 y-scale y-scale)) (.f64 a a))) (fma.f64 1/2 (/.f64 (-.f64 (+.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (.f64 b b))) (fma.f64 -1/3149280000 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 y-scale y-scale)) (.f64 a a)))))) (pow.f64 (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 1/32400 (.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)) (.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 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (.f64 b b)))))) (PI.f64)))) (fma.f64 180 (.f64 (/.f64 (fma.f64 180 (.f64 (/.f64 y-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 x-scale (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))))) (PI.f64))) (neg.f64 (.f64 32400 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 (.f64 y-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) 3) -1/8748000)) (pow.f64 (PI.f64) 2)))))) (PI.f64)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 32400 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 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)))) (pow.f64 (PI.f64) 2))))))) (fma.f64 1/2 (.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (.f64 (/.f64 y-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 x-scale (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (+.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (.f64 1/2 (/.f64 (+.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)))))) (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (-.f64 (fma.f64 -1/3149280000 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (.f64 b b))) (fma.f64 -1/3149280000 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.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 (-.f64 (.f64 b b) (.f64 a a)) (.f64 x-scale y-scale)) (.f64 (PI.f64) (fma.f64 1/22674816000000 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 5) y-scale)) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 5) y-scale)) 1/1511654400000)))))))) (/.f64 (.f64 -1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2))))) (/.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) 2) (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (.f64 b b))) (fma.f64 -1/3149280000 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.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) (.f64 x-scale y-scale)) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (.f64 b b))) (fma.f64 -1/3149280000 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 y-scale y-scale)) (.f64 a a)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 1/32400 (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (PI.f64)))) (fma.f64 32400 (.f64 (/.f64 y-scale (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))) (.f64 x-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/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 (fma.f64 180 (.f64 (/.f64 y-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 x-scale (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))))) (PI.f64))) (neg.f64 (.f64 32400 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 (.f64 y-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) 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)))) (.f64 (/.f64 (-.f64 (.f64 180 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 y-scale (-.f64 (fma.f64 -1/3149280000 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (.f64 b b))) (fma.f64 -1/3149280000 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.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) (.f64 x-scale y-scale)) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (.f64 b b))) (fma.f64 -1/3149280000 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 y-scale y-scale)) (.f64 a a)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 1/32400 (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (.f64 b b)))))) (PI.f64)))) (fma.f64 180 (.f64 (/.f64 (fma.f64 180 (.f64 (/.f64 y-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 x-scale (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))))) (PI.f64))) (neg.f64 (.f64 32400 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 (.f64 y-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) 3) -1/8748000)) (pow.f64 (PI.f64) 2)))))) (PI.f64)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 32400 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 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)))) (pow.f64 (PI.f64) 2)))))) (PI.f64)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))))))) (fma.f64 90 (.f64 (/.f64 y-scale angle) (/.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))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 1/2 (.f64 angle (fma.f64 180 (.f64 (/.f64 y-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 x-scale (-.f64 (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 b b) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/32400 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))))) (PI.f64))) (neg.f64 (.f64 32400 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 (.f64 y-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) 3) -1/8748000)) (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 (.f64 x-scale y-scale) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (.f64 (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 1/2 x-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a))) (.f64 y-scale (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (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 (.f64 x-scale y-scale) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (.f64 (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 1/2 x-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a))) (.f64 y-scale (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (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 (.f64 x-scale y-scale) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (.f64 (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 1/2 x-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a))) (.f64 y-scale (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (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 (.f64 x-scale y-scale) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (.f64 (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 1/2 x-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a))) (.f64 y-scale (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (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 (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 (pow.f64 b 2) (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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (.f64 (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 1/2 x-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a))) (.f64 y-scale (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (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 (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 (pow.f64 b 2) (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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (.f64 (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 1/2 x-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a))) (.f64 y-scale (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (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 (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 (pow.f64 b 2) (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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (.f64 (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 1/2 x-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a))) (.f64 y-scale (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (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 (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 (pow.f64 b 2) (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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (.f64 (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 1/2 x-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a))) (.f64 y-scale (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.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 x-scale y-scale) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (*.f64 a a))))
(.f64 -1/2 (.f64 (/.f64 y-scale (.f64 a a)) (/.f64 (.f64 x-scale (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 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 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 (-.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)))) 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 (.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 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 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 a a))) (.f64 (.f64 1/2 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (.f64 a a)) (/.f64 (.f64 y-scale (-.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 4 (/.f64 (pow.f64 a 4) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 a 4))))) (*.f64 b b)))
(fma.f64 -1/2 (.f64 (/.f64 y-scale (.f64 a a)) (/.f64 (.f64 x-scale (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 b b) (-.f64 (neg.f64 (.f64 (/.f64 y-scale (.f64 a a)) (/.f64 (.f64 x-scale (-.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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 (/.f64 x-scale (pow.f64 a 4)) (/.f64 (.f64 y-scale (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 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 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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)))))) (+.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 (/.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 -1 (/.f64 (.f64 y-scale (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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)))) 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 (.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 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 (pow.f64 b 4) (-.f64 (.f64 (.f64 1/2 (.f64 (/.f64 y-scale (.f64 a a)) (/.f64 (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 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 (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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 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 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (.f64 a a)) (/.f64 (.f64 y-scale (-.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 4 (/.f64 (pow.f64 a 4) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 a 4)))) (.f64 a a))))) (fma.f64 -1/2 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 a a))) (.f64 (.f64 1/2 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (.f64 a a)) (/.f64 (.f64 y-scale (-.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 4 (/.f64 (pow.f64 a 4) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 a 4))))) (*.f64 b b))))
(fma.f64 1/2 (.f64 (pow.f64 b 4) (-.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (/.f64 y-scale (.f64 a a)) (/.f64 (.f64 x-scale (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) 2))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 y-scale (.f64 a a)) (/.f64 (.f64 x-scale (-.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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 (/.f64 x-scale (pow.f64 a 4)) (/.f64 (.f64 y-scale (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 a a))))) (fma.f64 -1/2 (.f64 (/.f64 y-scale (.f64 a a)) (/.f64 (.f64 x-scale (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 b b) (-.f64 (neg.f64 (.f64 (/.f64 y-scale (.f64 a a)) (/.f64 (.f64 x-scale (-.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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 (/.f64 x-scale (pow.f64 a 4)) (/.f64 (.f64 y-scale (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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/4 (.f64 (/.f64 (.f64 x-scale (.f64 (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 y-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 (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 y-scale 2) (pow.f64 x-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 x-scale 2) (pow.f64 y-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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 y-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)))) 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 (.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 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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 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 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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)))))) (+.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 (/.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 -1 (/.f64 (.f64 y-scale (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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)))) 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 (.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 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 (.f64 -1/4 (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))) y-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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 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)))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (.f64 (.f64 a a) (.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 4 (/.f64 (pow.f64 a 4) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (/.f64 (-.f64 (.f64 (.f64 1/2 (.f64 (/.f64 y-scale (.f64 a a)) (/.f64 (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 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 (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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 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 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (.f64 a a)) (/.f64 (.f64 y-scale (-.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 4 (/.f64 (pow.f64 a 4) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 a 4)))) (.f64 a a)))) (.f64 a a)))) (pow.f64 b 6)) (fma.f64 1/2 (.f64 (pow.f64 b 4) (-.f64 (.f64 (.f64 1/2 (.f64 (/.f64 y-scale (.f64 a a)) (/.f64 (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 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 (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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 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 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (.f64 a a)) (/.f64 (.f64 y-scale (-.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 4 (/.f64 (pow.f64 a 4) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 a 4)))) (.f64 a a))))) (fma.f64 -1/2 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 a a))) (.f64 (.f64 1/2 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (.f64 a a)) (/.f64 (.f64 y-scale (-.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 4 (/.f64 (pow.f64 a 4) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 a 4))))) (*.f64 b b)))))
(fma.f64 1/2 (.f64 (-.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (/.f64 x-scale (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (.f64 (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 y-scale (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) 2))))))) (neg.f64 (/.f64 (-.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (/.f64 y-scale (.f64 a a)) (/.f64 (.f64 x-scale (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) 2))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 y-scale (.f64 a a)) (/.f64 (.f64 x-scale (-.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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 (/.f64 x-scale (pow.f64 a 4)) (/.f64 (.f64 y-scale (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 a a)))) (.f64 a a)))) (pow.f64 b 6)) (fma.f64 1/2 (.f64 (pow.f64 b 4) (-.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (/.f64 y-scale (.f64 a a)) (/.f64 (.f64 x-scale (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) 2))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 y-scale (.f64 a a)) (/.f64 (.f64 x-scale (-.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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 (/.f64 x-scale (pow.f64 a 4)) (/.f64 (.f64 y-scale (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 a a))))) (fma.f64 -1/2 (.f64 (/.f64 y-scale (.f64 a a)) (/.f64 (.f64 x-scale (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 b b) (-.f64 (neg.f64 (.f64 (/.f64 y-scale (.f64 a a)) (/.f64 (.f64 x-scale (-.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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 (/.f64 x-scale (pow.f64 a 4)) (/.f64 (.f64 y-scale (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.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 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 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 x-scale y-scale) (-.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 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 y-scale (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))))))
(+.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 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.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 a a))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.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)))))))) (.f64 b b)) (/.f64 (.f64 (.f64 x-scale y-scale) (-.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 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 y-scale (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))))) (/.f64 (-.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (.f64 (.f64 a a) (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))))))) (*.f64 b b))))
(+.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 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.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 y-scale (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (-.f64 (.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 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.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 a a))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) 2)))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.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 a a))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.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))))))))))) (pow.f64 b 4)) (.f64 1/2 (+.f64 (/.f64 (-.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.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 a a))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.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)))))))) (.f64 b b)) (/.f64 (.f64 (.f64 x-scale y-scale) (-.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)))))))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 y-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) 2))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (.f64 (.f64 a a) (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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))))))))))) (pow.f64 b 4)) (.f64 1/2 (+.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 y-scale (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))))) (/.f64 (-.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (.f64 (.f64 a a) (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))))))) (.f64 b b)))))
(+.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 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.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 y-scale (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (-.f64 (.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 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.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 a a))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) 2)))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.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 a a))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.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))))))))))) (pow.f64 b 4)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.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 a a))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.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)))))))) (.f64 b b)) (.f64 1/2 (+.f64 (/.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 y-scale y-scale)) (/.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 x-scale (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) (/.f64 (.f64 (.f64 y-scale (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (pow.f64 a 4) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.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 a a))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.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)) (.f64 a a))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale 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 y-scale y-scale)) (/.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 y-scale (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (-.f64 (.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 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.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 a a))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) 2)))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.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 a a))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.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)))))))))))))) (pow.f64 b 6)) (/.f64 (.f64 (.f64 x-scale y-scale) (-.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))))))))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 y-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) 2))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (.f64 (.f64 a a) (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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))))))))))) (pow.f64 b 4)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (.f64 (.f64 a a) (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))))))) (.f64 b b)) (.f64 1/2 (+.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 y-scale (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))))) (/.f64 (-.f64 (.f64 1/4 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) x-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) (.f64 y-scale (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) 2)))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 y-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) 2))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (.f64 (.f64 a a) (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))))))))))))) (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 (.f64 x-scale y-scale) (-.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 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 y-scale (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))))))
(+.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 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.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 a a))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.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)))))))) (.f64 b b)) (/.f64 (.f64 (.f64 x-scale y-scale) (-.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 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 y-scale (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))))) (/.f64 (-.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (.f64 (.f64 a a) (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))))))) (*.f64 b b))))
(+.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 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.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 y-scale (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (-.f64 (.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 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.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 a a))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) 2)))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.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 a a))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.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))))))))))) (pow.f64 b 4)) (.f64 1/2 (+.f64 (/.f64 (-.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.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 a a))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.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)))))))) (.f64 b b)) (/.f64 (.f64 (.f64 x-scale y-scale) (-.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)))))))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 y-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) 2))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (.f64 (.f64 a a) (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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))))))))))) (pow.f64 b 4)) (.f64 1/2 (+.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 y-scale (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))))) (/.f64 (-.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (.f64 (.f64 a a) (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))))))) (.f64 b b)))))
(+.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 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.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 y-scale (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (-.f64 (.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 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.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 a a))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) 2)))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.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 a a))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.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))))))))))) (pow.f64 b 4)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.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 a a))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.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)))))))) (.f64 b b)) (.f64 1/2 (+.f64 (/.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 y-scale y-scale)) (/.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 x-scale (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) (/.f64 (.f64 (.f64 y-scale (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (pow.f64 a 4) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.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 a a))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.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)) (.f64 a a))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale 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 y-scale y-scale)) (/.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 y-scale (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (-.f64 (.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 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.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 a a))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) 2)))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.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 a a))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.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)))))))))))))) (pow.f64 b 6)) (/.f64 (.f64 (.f64 x-scale y-scale) (-.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))))))))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 y-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) 2))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (.f64 (.f64 a a) (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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))))))))))) (pow.f64 b 4)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (.f64 (.f64 a a) (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))))))) (.f64 b b)) (.f64 1/2 (+.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 y-scale (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))))) (/.f64 (-.f64 (.f64 1/4 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) x-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) (.f64 y-scale (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) 2)))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 y-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) 2))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 2 (.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (.f64 (.f64 a a) (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))))))))))))) (pow.f64 b 6))))))
(.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (+.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))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 4 (/.f64 (pow.f64 (.f64 (+.f64 b a) (-.f64 b 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 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a)))))
(.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 y-scale (fma.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.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)))) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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 b 2) (pow.f64 (sin.f64 (.f64 1/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 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 y-scale (fma.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 4 (/.f64 (pow.f64 (.f64 (+.f64 b a) (-.f64 b 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 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 b a) (-.f64 b 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 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.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 a) (-.f64 b a)) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))) (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 b a) (-.f64 b a))))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 y-scale (fma.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.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)))) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (.f64 -1/4 x-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 (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 y-scale 3) (-.f64 (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (+.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))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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/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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 y-scale 5) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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) (.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/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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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 b 2) (pow.f64 (sin.f64 (.f64 1/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 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 y-scale (fma.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 4 (/.f64 (pow.f64 (.f64 (+.f64 b a) (-.f64 b 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 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 b a) (-.f64 b a))))) (fma.f64 1/8 (.f64 (/.f64 x-scale (pow.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 4 (/.f64 (pow.f64 (.f64 (+.f64 b a) (-.f64 b 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 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)) (.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (pow.f64 y-scale 5))) (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 b a) (-.f64 b a))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 -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 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.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 a) (-.f64 b a)) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))) (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 b a) (-.f64 b a)))))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 y-scale (fma.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.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)))) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 1/8 (.f64 (/.f64 x-scale (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2)) (/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (pow.f64 y-scale 5))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 -1/4 x-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 (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 y-scale 3) (-.f64 (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (+.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))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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))))) 2) (.f64 -1/4 (/.f64 (.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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))))))) (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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/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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 y-scale 5) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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) (.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/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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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 b 2) (pow.f64 (sin.f64 (.f64 1/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 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 y-scale (fma.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 4 (/.f64 (pow.f64 (.f64 (+.f64 b a) (-.f64 b 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 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 b a) (-.f64 b a))))) (fma.f64 1/4 (/.f64 x-scale (/.f64 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 b a) (-.f64 b 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 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 4 (/.f64 (pow.f64 (.f64 (+.f64 b a) (-.f64 b 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 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2) (.f64 -1/4 (.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 4 (/.f64 (pow.f64 (.f64 (+.f64 b a) (-.f64 b 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)))))) (pow.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.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 a) (-.f64 b a)) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))) (pow.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))))))) (fma.f64 1/8 (.f64 (/.f64 x-scale (pow.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 4 (/.f64 (pow.f64 (.f64 (+.f64 b a) (-.f64 b 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 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)) (.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (pow.f64 y-scale 5))) (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 b a) (-.f64 b a))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 -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 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.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 a) (-.f64 b a)) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))) (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 y-scale (fma.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.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)))) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 1/4 (.f64 (/.f64 x-scale (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 (pow.f64 y-scale 7) (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) 2) (.f64 -1/4 (.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.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))))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2)) (/.f64 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (-.f64 (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (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 x-scale (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2)) (/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (pow.f64 y-scale 5))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 -1/4 x-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 (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 y-scale 3) (-.f64 (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 -1/2 (/.f64 (.f64 x-scale (.f64 y-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 (cos.f64 (.f64 1/180 (.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 x-scale y-scale) (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.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 a) (-.f64 b a))))))
(.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 y-scale (.f64 2 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.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)) (.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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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)))))) x-scale) (.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 (.f64 x-scale y-scale) (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.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 a) (-.f64 b a))))) (.f64 1/2 (.f64 (/.f64 (+.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 4 (/.f64 (pow.f64 (.f64 (+.f64 b a) (-.f64 b 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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) y-scale) (/.f64 x-scale (.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)))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 y-scale (.f64 2 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (.f64 1/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 -1/2 (fma.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 (.f64 (.f64 y-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)))))) x-scale)))
(+.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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.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 y-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 (cos.f64 (.f64 1/180 (.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)) (.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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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)))))) x-scale) (.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/4 (/.f64 x-scale (/.f64 (.f64 (pow.f64 y-scale 3) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 (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 (pow.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)))) (fma.f64 -1/2 (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.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 a) (-.f64 b a))))) (.f64 1/2 (.f64 (/.f64 (+.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 4 (/.f64 (pow.f64 (.f64 (+.f64 b a) (-.f64 b 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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) y-scale) (/.f64 x-scale (.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))))))))
(fma.f64 -1/4 (.f64 (/.f64 x-scale (.f64 (pow.f64 y-scale 3) (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 b) (.f64 a a)))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))) (fma.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 y-scale (.f64 2 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (.f64 1/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 -1/2 (fma.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 (.f64 (.f64 y-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)))))) x-scale))))
(+.f64 (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 5) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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) (cos.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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.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 y-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 (cos.f64 (.f64 1/180 (.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)) (.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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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)))))) x-scale) (.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/8 (.f64 (/.f64 x-scale (.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (-.f64 (pow.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 4 (/.f64 (pow.f64 (.f64 (+.f64 b a) (-.f64 b 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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (pow.f64 y-scale 5) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))))) (fma.f64 -1/4 (/.f64 x-scale (/.f64 (.f64 (pow.f64 y-scale 3) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 (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 (pow.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)))) (fma.f64 -1/2 (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.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 a) (-.f64 b a))))) (.f64 1/2 (.f64 (/.f64 (+.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 4 (/.f64 (pow.f64 (.f64 (+.f64 b a) (-.f64 b 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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) y-scale) (/.f64 x-scale (.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)))))))))
(fma.f64 1/8 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.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) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 5) (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))))) (fma.f64 -1/4 (.f64 (/.f64 x-scale (.f64 (pow.f64 y-scale 3) (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 b) (.f64 a a)))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))) (fma.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 y-scale (.f64 2 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (.f64 1/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 -1/2 (fma.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 (.f64 (.f64 y-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)))))) x-scale)))))
(.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-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 (cos.f64 (.f64 1/180 (.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 x-scale y-scale) (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.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 a) (-.f64 b a))))))
(.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 y-scale (.f64 2 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.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)) (.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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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)))))) x-scale) (.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 (.f64 x-scale y-scale) (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.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 a) (-.f64 b a))))) (.f64 1/2 (.f64 (/.f64 (+.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 4 (/.f64 (pow.f64 (.f64 (+.f64 b a) (-.f64 b 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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) y-scale) (/.f64 x-scale (.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)))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 y-scale (.f64 2 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (.f64 1/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 -1/2 (fma.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 (.f64 (.f64 y-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)))))) x-scale)))
(+.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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.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 y-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 (cos.f64 (.f64 1/180 (.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)) (.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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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)))))) x-scale) (.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/4 (/.f64 x-scale (/.f64 (.f64 (pow.f64 y-scale 3) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 (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 (pow.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)))) (fma.f64 -1/2 (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.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 a) (-.f64 b a))))) (.f64 1/2 (.f64 (/.f64 (+.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 4 (/.f64 (pow.f64 (.f64 (+.f64 b a) (-.f64 b 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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) y-scale) (/.f64 x-scale (.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))))))))
(fma.f64 -1/4 (.f64 (/.f64 x-scale (.f64 (pow.f64 y-scale 3) (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 b) (.f64 a a)))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))) (fma.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 y-scale (.f64 2 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (.f64 1/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 -1/2 (fma.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 (.f64 (.f64 y-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)))))) x-scale))))
(+.f64 (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 5) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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) (cos.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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.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 y-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 (cos.f64 (.f64 1/180 (.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)) (.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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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)))))) x-scale) (.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/8 (.f64 (/.f64 x-scale (.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (-.f64 (pow.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 4 (/.f64 (pow.f64 (.f64 (+.f64 b a) (-.f64 b 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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (pow.f64 y-scale 5) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))))) (fma.f64 -1/4 (/.f64 x-scale (/.f64 (.f64 (pow.f64 y-scale 3) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 (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 (pow.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)))) (fma.f64 -1/2 (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.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 a) (-.f64 b a))))) (.f64 1/2 (.f64 (/.f64 (+.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 4 (/.f64 (pow.f64 (.f64 (+.f64 b a) (-.f64 b 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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) y-scale) (/.f64 x-scale (.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)))))))))
(fma.f64 1/8 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.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) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 5) (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))))) (fma.f64 -1/4 (.f64 (/.f64 x-scale (.f64 (pow.f64 y-scale 3) (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 b) (.f64 a a)))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))) (fma.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 y-scale (.f64 2 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (.f64 1/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 -1/2 (fma.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.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 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 (.f64 (.f64 y-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)))))) x-scale)))))
(.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 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 (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 -1/2 y-scale) (/.f64 (.f64 (.f64 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 (.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 1/2 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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/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 (.f64 x-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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 b a) (-.f64 b a))))) (.f64 -1/2 (.f64 (/.f64 y-scale x-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 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))))))
(fma.f64 1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (.f64 -1/2 y-scale) (/.f64 (.f64 (.f64 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 (.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 1/2 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (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 (.f64 x-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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 b a) (-.f64 b a))))) (fma.f64 -1/4 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.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 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/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 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) 2))) (.f64 (.f64 (+.f64 b a) (-.f64 b a)) (.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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (.f64 -1/2 (.f64 (/.f64 y-scale x-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 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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))))))))
(fma.f64 1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 -1/4 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (pow.f64 x-scale 3) (-.f64 (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.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)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (/.f64 (.f64 -1/2 y-scale) (/.f64 (.f64 (.f64 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 (.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 1/2 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (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 (pow.f64 x-scale 5) (.f64 y-scale (.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 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.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 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 -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 (.f64 x-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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 b a) (-.f64 b a))))) (fma.f64 -1/4 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.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 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/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 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) 2))) (.f64 (.f64 (+.f64 b a) (-.f64 b a)) (.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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (fma.f64 1/8 (.f64 (/.f64 (pow.f64 x-scale 5) (.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (.f64 (.f64 y-scale (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2))))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (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 (.f64 (+.f64 b a) (-.f64 b a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) 2))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.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)) (cos.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 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 (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)))))))))
(fma.f64 1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 -1/4 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (pow.f64 x-scale 3) (-.f64 (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.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)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (fma.f64 1/8 (.f64 (/.f64 (pow.f64 x-scale 5) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 y-scale (.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (-.f64 (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) 2)))) (.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) (.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)))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2)))))) (/.f64 (.f64 -1/2 y-scale) (/.f64 (.f64 (.f64 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 (.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 -1/2 (/.f64 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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))))))) y-scale) (.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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (/.f64 (.f64 x-scale (.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)))) y-scale)))
(.f64 -1/2 (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (.f64 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))))))) y-scale))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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))))))) y-scale) (.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 b 2) (pow.f64 (cos.f64 (.f64 1/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 (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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (/.f64 (.f64 x-scale (.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)))) y-scale)) (.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 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.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))))))))
(fma.f64 -1/2 (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (.f64 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))))))) y-scale) (.f64 -1/4 (.f64 (/.f64 y-scale (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 b) (.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 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)))))
(+.f64 (.f64 1/8 (/.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 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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 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 (.f64 -1/2 (/.f64 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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))))))) y-scale) (.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 b 2) (pow.f64 (cos.f64 (.f64 1/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 (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/8 (/.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 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)))))) (/.f64 (.f64 (pow.f64 x-scale 5) (.f64 (.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))) (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 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 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (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 (.f64 (+.f64 b a) (-.f64 b a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2))))) (fma.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (/.f64 (.f64 x-scale (.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)))) y-scale)) (.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 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.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)))))))))
(fma.f64 1/8 (.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (pow.f64 x-scale 5)) (/.f64 (.f64 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 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))) (.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 3)))) (fma.f64 -1/2 (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (.f64 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))))))) y-scale) (.f64 -1/4 (.f64 (/.f64 y-scale (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 b) (.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 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))))))
(+.f64 (.f64 1/4 (/.f64 (.f64 y-scale (+.f64 (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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 b 2) (pow.f64 (cos.f64 (.f64 1/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)))))))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 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 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/8 (/.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 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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 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 (.f64 -1/2 (/.f64 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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))))))) y-scale) (.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 b 2) (pow.f64 (cos.f64 (.f64 1/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 (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 (+.f64 (pow.f64 (/.f64 (.f64 1/2 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (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 (.f64 (+.f64 b a) (-.f64 b a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2) (.f64 -1/4 (/.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)))))) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 4) (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (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 (.f64 (+.f64 b a) (-.f64 b a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2))))))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.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)))))) (fma.f64 1/8 (/.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 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)))))) (/.f64 (.f64 (pow.f64 x-scale 5) (.f64 (.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))) (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 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 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (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 (.f64 (+.f64 b a) (-.f64 b a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2))))) (fma.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (/.f64 (.f64 x-scale (.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)))) y-scale)) (.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 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.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))))))))))
(fma.f64 1/4 (.f64 (/.f64 y-scale (pow.f64 x-scale 7)) (/.f64 (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2) (.f64 -1/4 (.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 4)) (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.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 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)))))) (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 b) (.f64 a a)))))) (fma.f64 1/8 (.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (pow.f64 x-scale 5)) (/.f64 (.f64 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 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))) (.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 3)))) (fma.f64 -1/2 (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (.f64 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))))))) y-scale) (.f64 -1/4 (.f64 (/.f64 y-scale (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 b) (.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 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)))))))
(.f64 -1/2 (/.f64 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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))))))) y-scale) (.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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (/.f64 (.f64 x-scale (.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)))) y-scale)))
(.f64 -1/2 (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (.f64 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))))))) y-scale))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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))))))) y-scale) (.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 b 2) (pow.f64 (cos.f64 (.f64 1/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 (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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (/.f64 (.f64 x-scale (.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)))) y-scale)) (.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 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.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))))))))
(fma.f64 -1/2 (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (.f64 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))))))) y-scale) (.f64 -1/4 (.f64 (/.f64 y-scale (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 b) (.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 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)))))
(+.f64 (.f64 1/8 (/.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 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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 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 (.f64 -1/2 (/.f64 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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))))))) y-scale) (.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 b 2) (pow.f64 (cos.f64 (.f64 1/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 (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/8 (/.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 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)))))) (/.f64 (.f64 (pow.f64 x-scale 5) (.f64 (.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))) (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 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 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (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 (.f64 (+.f64 b a) (-.f64 b a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2))))) (fma.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (/.f64 (.f64 x-scale (.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)))) y-scale)) (.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 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.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)))))))))
(fma.f64 1/8 (.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (pow.f64 x-scale 5)) (/.f64 (.f64 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 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))) (.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 3)))) (fma.f64 -1/2 (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (.f64 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))))))) y-scale) (.f64 -1/4 (.f64 (/.f64 y-scale (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 b) (.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 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))))))
(+.f64 (.f64 1/4 (/.f64 (.f64 y-scale (+.f64 (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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 b 2) (pow.f64 (cos.f64 (.f64 1/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)))))))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 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 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/8 (/.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 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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 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 (.f64 -1/2 (/.f64 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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))))))) y-scale) (.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 b 2) (pow.f64 (cos.f64 (.f64 1/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 (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 (+.f64 (pow.f64 (/.f64 (.f64 1/2 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (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 (.f64 (+.f64 b a) (-.f64 b a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2) (.f64 -1/4 (/.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)))))) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 4) (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (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 (.f64 (+.f64 b a) (-.f64 b a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2))))))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.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)))))) (fma.f64 1/8 (/.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 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)))))) (/.f64 (.f64 (pow.f64 x-scale 5) (.f64 (.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))) (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 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 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (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 (.f64 (+.f64 b a) (-.f64 b a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2))))) (fma.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (/.f64 (.f64 x-scale (.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)))) y-scale)) (.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 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (.f64 (+.f64 b a) (-.f64 b a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.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))))))))))
(fma.f64 1/4 (.f64 (/.f64 y-scale (pow.f64 x-scale 7)) (/.f64 (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2) (.f64 -1/4 (.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 4)) (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.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 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)))))) (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 b) (.f64 a a)))))) (fma.f64 1/8 (.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (pow.f64 x-scale 5)) (/.f64 (.f64 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 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))) (.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 3)))) (fma.f64 -1/2 (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (.f64 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))))))) y-scale) (.f64 -1/4 (.f64 (/.f64 y-scale (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 b) (.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 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 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 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale))) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))) (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) x-scale))))
(-.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (.f64 2 (.f64 (+.f64 b a) (-.f64 b a))))))) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (.f64 2 (.f64 (+.f64 b a) (-.f64 b a)))))) 2))) (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))))))
(-.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.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 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) 2))) (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))))
(.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (/.f64 1 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) x-scale))))
(.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (.f64 2 (.f64 (+.f64 b a) (-.f64 b a)))))) 2)))) (/.f64 1 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))))))
(.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) 2)))) (.f64 (/.f64 1 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))) x-scale))
(.f64 1 (.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (.f64 (cos.f64 (.f64 (.f64 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 x-scale y-scale) (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (.f64 2 (.f64 (+.f64 b a) (-.f64 b a)))))) 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))))))
(.f64 (.f64 x-scale y-scale) (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.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 2 (-.f64 (.f64 b b) (.f64 a a)))))))
(.f64 (sqrt.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (.f64 (cos.f64 (.f64 (.f64 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))) (sqrt.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (.f64 (cos.f64 (.f64 (.f64 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 x-scale y-scale) (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (.f64 2 (.f64 (+.f64 b a) (-.f64 b a)))))) 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))))))
(.f64 (.f64 x-scale y-scale) (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.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 2 (-.f64 (.f64 b b) (.f64 a a)))))))
(.f64 (.f64 (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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (.f64 (cos.f64 (.f64 (.f64 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))) (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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (.f64 (cos.f64 (.f64 (.f64 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)))) (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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (.f64 (cos.f64 (.f64 (.f64 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 x-scale y-scale) (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (.f64 2 (.f64 (+.f64 b a) (-.f64 b a)))))) 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))))))
(.f64 (.f64 x-scale y-scale) (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.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 2 (-.f64 (.f64 b b) (.f64 a a)))))))
(.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (.f64 (cos.f64 (.f64 (.f64 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 x-scale y-scale) (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (.f64 2 (.f64 (+.f64 b a) (-.f64 b a)))))) 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))))))
(.f64 (.f64 x-scale y-scale) (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.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 2 (-.f64 (.f64 b b) (.f64 a a)))))))
(pow.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (.f64 (cos.f64 (.f64 (.f64 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)) 1)
(.f64 (.f64 x-scale y-scale) (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (.f64 2 (.f64 (+.f64 b a) (-.f64 b a)))))) 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))))))
(.f64 (.f64 x-scale y-scale) (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.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 2 (-.f64 (.f64 b b) (.f64 a a)))))))
(log.f64 (exp.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (.f64 (cos.f64 (.f64 (.f64 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 x-scale y-scale) (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (.f64 2 (.f64 (+.f64 b a) (-.f64 b a)))))) 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))))))
(.f64 (.f64 x-scale y-scale) (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.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 2 (-.f64 (.f64 b b) (.f64 a a)))))))
(cbrt.f64 (.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (.f64 (cos.f64 (.f64 (.f64 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 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (.f64 (cos.f64 (.f64 (.f64 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 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (.f64 (cos.f64 (.f64 (.f64 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))))
(cbrt.f64 (.f64 (.f64 (.f64 x-scale y-scale) (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (.f64 2 (.f64 (+.f64 b a) (-.f64 b a)))))) 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (.f64 (+.f64 b a) (-.f64 b a))))))) (.f64 (.f64 (.f64 x-scale y-scale) (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (.f64 2 (.f64 (+.f64 b a) (-.f64 b a)))))) 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (.f64 (+.f64 b a) (-.f64 b a))))))) (.f64 (.f64 x-scale y-scale) (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (.f64 2 (.f64 (+.f64 b a) (-.f64 b a)))))) 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))))))))
(cbrt.f64 (.f64 (.f64 (.f64 x-scale y-scale) (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.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 2 (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 (.f64 (.f64 x-scale y-scale) (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.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 2 (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 (.f64 x-scale y-scale) (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.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 2 (-.f64 (.f64 b b) (.f64 a a))))))))))
(expm1.f64 (log1p.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (.f64 (cos.f64 (.f64 (.f64 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 x-scale y-scale) (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (.f64 2 (.f64 (+.f64 b a) (-.f64 b a)))))) 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))))))
(.f64 (.f64 x-scale y-scale) (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.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 2 (-.f64 (.f64 b b) (.f64 a a)))))))
(exp.f64 (log.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (.f64 (cos.f64 (.f64 (.f64 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 x-scale y-scale) (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (.f64 2 (.f64 (+.f64 b a) (-.f64 b a)))))) 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))))))
(.f64 (.f64 x-scale y-scale) (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.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 2 (-.f64 (.f64 b b) (.f64 a a)))))))
(log1p.f64 (expm1.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))) (.f64 (cos.f64 (.f64 (.f64 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 x-scale y-scale) (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (.f64 2 (.f64 (+.f64 b a) (-.f64 b a)))))) 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))))))
(.f64 (.f64 x-scale y-scale) (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.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 2 (-.f64 (.f64 b b) (.f64 a a)))))))

localize616.0ms (0.4%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	73.7%	(-.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))))
✓	67.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))
	59.4%	(cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))
	58.7%	(sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))

Compiler

Compiled 1508 to 1061 computations (29.6% saved)

series252.0ms (0.2%)

Counts

2 → 120

Calls

30 calls:

Time	Variable		Point	Expression
71.0ms	b	@	-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))
16.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))
14.0ms	y-scale	@	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))
12.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))

rewrite108.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	964
1	1076	964

Stop Event

1×	node limit

Counts

2 → 24

Calls

Call 1

Inputs

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

Algorithm

1×	egg-herbie

Rules

1180×	`+-commutative`
1154×	`associate-*r/`
1146×	`*-commutative`
996×	`associate-*l/`
530×	`associate-+r+`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	1305	239062
1	5220	239056

Stop Event

1×	node limit

Counts

144 → 250

Calls

Call 1

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

Outputs
(.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 x-scale (.f64 b b)) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))))) (.f64 (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 b b)) (/.f64 (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)))))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (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 1/2 (+.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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))))))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (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 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 (pow.f64 b 4) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))))) (.f64 (/.f64 x-scale (.f64 b b)) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))))
(.f64 1/2 (+.f64 (.f64 (/.f64 x-scale (.f64 b b)) (/.f64 (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)))))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))) (.f64 (pow.f64 b 4) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (*.f64 1/180 (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))))))))
(fma.f64 1/2 (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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))))))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (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 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 (pow.f64 b 4) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))))) (.f64 1/2 (+.f64 (.f64 (/.f64 x-scale (.f64 b b)) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (pow.f64 a 4) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)))) (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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)))))))) 2))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 b b) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (neg.f64 (neg.f64 (/.f64 (-.f64 (/.f64 y-scale (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 b b) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.f64 x-scale (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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)))))))))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (pow.f64 b 4)))))) (.f64 b b)))))))))
(fma.f64 1/2 (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))) (.f64 (pow.f64 b 4) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))))) (.f64 1/2 (+.f64 (.f64 (/.f64 x-scale (.f64 b b)) (/.f64 (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)))))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (pow.f64 a 4) (-.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))))) 2))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))) -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 b b) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (neg.f64 (/.f64 (-.f64 (/.f64 y-scale (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 b b) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.f64 x-scale (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))))))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)))))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (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 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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))))))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (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 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 (pow.f64 b 4) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))))) (fma.f64 1/2 (.f64 (pow.f64 a 6) (-.f64 (.f64 (.f64 1/4 (.f64 (/.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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))))))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))) 2)) (.f64 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 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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 (.f64 b b) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale)))))))))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))) (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))) (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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))))))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))) 2))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 b b) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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))))))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (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 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 (pow.f64 b 4) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (.f64 b b)))) (.f64 b b))))) (.f64 1/2 (+.f64 (.f64 (/.f64 x-scale (.f64 b b)) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (pow.f64 a 4) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)))) (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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)))))))) 2))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 b b) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (neg.f64 (neg.f64 (/.f64 (-.f64 (/.f64 y-scale (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 b b) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.f64 x-scale (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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)))))))))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (pow.f64 b 4)))))) (*.f64 b b))))))))))
(fma.f64 1/2 (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))) (.f64 (pow.f64 b 4) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))))) (fma.f64 1/2 (.f64 (pow.f64 a 6) (-.f64 (.f64 (/.f64 (.f64 1/4 x-scale) (/.f64 (.f64 (.f64 (.f64 b b) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4))))))) (.f64 (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))) 2)) (.f64 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 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))))))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))) (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 -1/2 (.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4))))))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 b b) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))) (.f64 (pow.f64 b 4) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (.f64 b b)))) (.f64 b b))))) (.f64 1/2 (+.f64 (.f64 (/.f64 x-scale (.f64 b b)) (/.f64 (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)))))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (pow.f64 a 4) (-.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))))) 2))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))) -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 b b) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (neg.f64 (/.f64 (-.f64 (/.f64 y-scale (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 b b) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.f64 x-scale (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))))))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)))))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (.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 y-scale) (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (.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 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 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (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 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (.f64 b b)) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 a a))))
(fma.f64 -1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 x-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (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 y-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 b b)) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) 1/2) (.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 (.f64 1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 x-scale (-.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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))))))) 2))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (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 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (.f64 b b)) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))))) (pow.f64 a 4)) (fma.f64 -1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (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 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (.f64 b b)) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (*.f64 a a)))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 (.f64 1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 x-scale (-.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) 2))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (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 y-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 b b)) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))))) (pow.f64 a 4)) (fma.f64 -1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 x-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (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 y-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 b b)) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) 1/2) (*.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 y-scale (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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))))))) 2))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (.f64 (.f64 1/2 (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 x-scale (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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))))))) 2)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (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 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (.f64 b b)) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))))))) (pow.f64 a 6)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 (.f64 1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 x-scale (-.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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))))))) 2))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (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 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (.f64 b b)) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))))) (pow.f64 a 4)) (fma.f64 -1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (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 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (.f64 b b)) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (*.f64 a a))))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 -1/4 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) y-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)))) (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) 2))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (.f64 (.f64 1/2 (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 x-scale (+.f64 (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)))) (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (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 y-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 b b)) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))))))) (pow.f64 a 6)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 (.f64 1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 x-scale (-.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) 2))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (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 y-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 b b)) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))))) (pow.f64 a 4)) (fma.f64 -1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 x-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (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 y-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 b b)) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) 1/2) (*.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (.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 y-scale) (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (.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 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 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (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 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (.f64 b b)) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 a a))))
(fma.f64 -1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 x-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (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 y-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 b b)) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) 1/2) (.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 (.f64 1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 x-scale (-.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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))))))) 2))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (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 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (.f64 b b)) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))))) (pow.f64 a 4)) (fma.f64 -1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (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 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (.f64 b b)) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (*.f64 a a)))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 (.f64 1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 x-scale (-.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) 2))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (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 y-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 b b)) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))))) (pow.f64 a 4)) (fma.f64 -1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 x-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (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 y-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 b b)) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) 1/2) (*.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 y-scale (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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))))))) 2))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (.f64 (.f64 1/2 (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 x-scale (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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))))))) 2)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (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 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (.f64 b b)) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))))))) (pow.f64 a 6)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 (.f64 1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 x-scale (-.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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))))))) 2))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (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 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (.f64 b b)) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))))) (pow.f64 a 4)) (fma.f64 -1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (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 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (.f64 b b)) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (*.f64 a a))))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 -1/4 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) y-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)))) (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) 2))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (.f64 (.f64 1/2 (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 x-scale (+.f64 (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)))) (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (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 y-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 b b)) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))))))) (pow.f64 a 6)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 (.f64 1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 x-scale (-.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) 2))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (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 y-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 b b)) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))))) (pow.f64 a 4)) (fma.f64 -1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 x-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (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 y-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 b b)) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) 1/2) (*.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 (/.f64 y-scale angle) (/.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))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))
(+.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 (/.f64 y-scale angle) (/.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))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 1/2 angle) (+.f64 (/.f64 (.f64 180 (.f64 x-scale (.f64 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 (.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 1/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 x-scale (.f64 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 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))))))
(fma.f64 90 (.f64 (/.f64 y-scale angle) (/.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))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 1/2 angle) (+.f64 (/.f64 (.f64 180 (.f64 x-scale (.f64 y-scale (-.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 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 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 1/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 x-scale (.f64 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 (-.f64 (.f64 b b) (.f64 a a)) (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)))))))))
(fma.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 y-scale (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-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 (.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))))) (fma.f64 180 (/.f64 (+.f64 (/.f64 (.f64 180 (.f64 x-scale (.f64 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 (.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 1/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 x-scale (.f64 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 (-.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 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 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))))) (fma.f64 90 (.f64 (/.f64 y-scale angle) (/.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))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 1/2 angle) (+.f64 (/.f64 (.f64 180 (.f64 x-scale (.f64 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 (.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 1/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 x-scale (.f64 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 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))))))))
(fma.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (/.f64 (.f64 (.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 (.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 (.f64 1/32400 (.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 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-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 180 (/.f64 (+.f64 (/.f64 (.f64 180 (.f64 x-scale (.f64 y-scale (-.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 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 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 1/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 x-scale (.f64 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 (-.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 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 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))))) (fma.f64 90 (.f64 (/.f64 y-scale angle) (/.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))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 1/2 angle) (+.f64 (/.f64 (.f64 180 (.f64 x-scale (.f64 y-scale (-.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 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 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 1/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 x-scale (.f64 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 (-.f64 (.f64 b b) (*.f64 a a)) (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))))))))))
(fma.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 y-scale (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-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 (.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))))) (fma.f64 180 (/.f64 (+.f64 (/.f64 (.f64 180 (.f64 x-scale (.f64 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 (.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 1/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 x-scale (.f64 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 (-.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 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 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))))) (fma.f64 1/2 (.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (/.f64 y-scale (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 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 (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 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)) (.f64 2/45 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (.f64 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 1/2 (/.f64 (fma.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2)) (/.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) 2) (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))))) (fma.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)))) (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 (.f64 180 (.f64 x-scale (.f64 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 (.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 1/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 x-scale (.f64 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 (-.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 (/.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 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)) (.f64 2/45 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (.f64 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 1/2 (/.f64 (fma.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-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 (/.f64 (.f64 180 (.f64 x-scale (.f64 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 (.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 1/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 x-scale (.f64 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 (-.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 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 (-.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 90 (.f64 (/.f64 y-scale angle) (/.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))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 1/2 angle) (+.f64 (/.f64 (.f64 180 (.f64 x-scale (.f64 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 (.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 1/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 x-scale (.f64 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 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))))))))
(fma.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (/.f64 (.f64 (.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 (.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 (.f64 1/32400 (.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 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-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 180 (/.f64 (+.f64 (/.f64 (.f64 180 (.f64 x-scale (.f64 y-scale (-.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 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 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 1/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 x-scale (.f64 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 (-.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 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 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))))) (fma.f64 1/2 (.f64 (pow.f64 angle 5) (-.f64 (/.f64 (.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 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 (.f64 1/32400 (.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 (.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 (.f64 1/32400 (.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 b b) (.f64 a a)) -1/8748000) (/.f64 (.f64 x-scale y-scale) (pow.f64 (PI.f64) 3))))))))) (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 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2))) (/.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) 2) (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.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 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))))) 180) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.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)))) (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 (.f64 180 (.f64 x-scale (.f64 y-scale (-.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 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 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 1/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 x-scale (.f64 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 (-.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 (/.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 (.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 (.f64 1/32400 (.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 b b) (.f64 a a)) -1/8748000) (/.f64 (.f64 x-scale y-scale) (pow.f64 (PI.f64) 3))))))))) (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 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-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 (/.f64 (.f64 180 (.f64 x-scale (.f64 y-scale (-.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 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 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 1/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 x-scale (.f64 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 (-.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 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 (-.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 90 (.f64 (/.f64 y-scale angle) (/.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))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 1/2 angle) (+.f64 (/.f64 (.f64 180 (.f64 x-scale (.f64 y-scale (-.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 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 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 1/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 x-scale (.f64 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 (-.f64 (.f64 b b) (.f64 a a)) (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 (.f64 x-scale y-scale) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 1/2 (/.f64 (.f64 (.f64 x-scale y-scale) (+.f64 (/.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 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 1/2 (/.f64 (.f64 (.f64 x-scale y-scale) (+.f64 (/.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 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 1/2 (/.f64 (.f64 (.f64 x-scale y-scale) (+.f64 (/.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 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 1/2 (/.f64 (.f64 (.f64 x-scale y-scale) (+.f64 (/.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 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 1/2 (/.f64 (.f64 (.f64 x-scale y-scale) (+.f64 (/.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 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 1/2 (/.f64 (.f64 (.f64 x-scale y-scale) (+.f64 (/.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 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 1/2 (/.f64 (.f64 (.f64 x-scale y-scale) (+.f64 (/.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 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 1/2 (/.f64 (.f64 (.f64 x-scale y-scale) (+.f64 (/.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 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (.f64 -1/2 (.f64 x-scale (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 a a)))
(/.f64 (.f64 -1/2 (.f64 x-scale (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 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 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.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 (.f64 (.f64 x-scale y-scale) (-.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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))) (.f64 a a)))) (.f64 (/.f64 x-scale (pow.f64 a 4)) (/.f64 (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 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 x-scale (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 a a))))
(fma.f64 1/2 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.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 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (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)) -8) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))) (.f64 a a)))) (.f64 (/.f64 x-scale (pow.f64 a 4)) (/.f64 (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 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 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (/.f64 (.f64 -1/2 (.f64 x-scale (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 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 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.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 (.f64 (.f64 x-scale y-scale) (-.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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))) (.f64 a a)))) (.f64 (/.f64 x-scale (pow.f64 a 4)) (/.f64 (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 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 (pow.f64 b 4) (-.f64 (.f64 1/2 (/.f64 (.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) 2))) (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 a a)))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))) (.f64 a a)))) (.f64 (/.f64 x-scale (pow.f64 a 4)) (/.f64 (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 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 a a))))) (/.f64 (.f64 -1/2 (.f64 x-scale (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 a a)))))
(fma.f64 1/2 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.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 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (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)) -8) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))) (.f64 a a)))) (.f64 (/.f64 x-scale (pow.f64 a 4)) (/.f64 (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 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 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (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)) -8) (.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 a a)))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.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 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (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)) -8) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))) (.f64 a a)))) (.f64 (/.f64 x-scale (pow.f64 a 4)) (/.f64 (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 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 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (.f64 a a))))) (/.f64 (.f64 -1/2 (.f64 x-scale (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 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 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.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 (.f64 (.f64 x-scale y-scale) (-.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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))) (.f64 a a)))) (.f64 (/.f64 x-scale (pow.f64 a 4)) (/.f64 (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 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 (.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 x-scale (/.f64 (.f64 (.f64 (.f64 a a) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.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 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) 2)) (.f64 y-scale (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))))))))))) (neg.f64 (/.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) 2))) (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 a a)))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))) (.f64 a a)))) (.f64 (/.f64 x-scale (pow.f64 a 4)) (/.f64 (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 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 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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) 2))) (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 a a)))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))) (.f64 a a)))) (.f64 (/.f64 x-scale (pow.f64 a 4)) (/.f64 (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 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 a a))))) (/.f64 (.f64 -1/2 (.f64 x-scale (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 a a))))))
(fma.f64 1/2 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.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 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (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)) -8) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))) (.f64 a a)))) (.f64 (/.f64 x-scale (pow.f64 a 4)) (/.f64 (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 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 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (fma.f64 1/2 (.f64 (-.f64 (.f64 (/.f64 (.f64 -1/4 x-scale) (/.f64 (.f64 (.f64 (.f64 a a) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (.f64 (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (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)) -8) (.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (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)) -8) (.f64 (.f64 y-scale y-scale) (.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 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))))) (neg.f64 (/.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (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)) -8) (.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 a a)))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.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 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (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)) -8) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))) (.f64 a a)))) (.f64 (/.f64 x-scale (pow.f64 a 4)) (/.f64 (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 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 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (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)) -8) (.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 a a)))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.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 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (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)) -8) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))) (.f64 a a)))) (.f64 (/.f64 x-scale (pow.f64 a 4)) (/.f64 (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 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 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (.f64 a a))))) (/.f64 (.f64 -1/2 (.f64 x-scale (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 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 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.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 1/2 (/.f64 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 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 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale (-.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 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 y-scale (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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 1/2 (+.f64 (/.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 y-scale (-.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (neg.f64 (/.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.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)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 -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 (.f64 (.f64 y-scale (.f64 x-scale (-.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))))) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) 2)))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (neg.f64 (.f64 (.f64 a a) (-.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 y-scale (-.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 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 y-scale (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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))))))))))) (pow.f64 b 4)) (.f64 1/2 (+.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 y-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale (-.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 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 y-scale (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 x-scale (+.f64 (/.f64 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) 2))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (neg.f64 (.f64 (.f64 a a) (-.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 y-scale (-.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (neg.f64 (/.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.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)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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)))))))))) (pow.f64 b 4)) (.f64 1/2 (+.f64 (/.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 y-scale (-.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (neg.f64 (/.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.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)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 -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 (.f64 (.f64 y-scale (.f64 x-scale (-.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))))) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) 2)))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (neg.f64 (.f64 (.f64 a a) (-.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 y-scale (-.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 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 y-scale (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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))))))))))) (pow.f64 b 4)) (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 y-scale (-.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 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 y-scale (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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 1/2 (+.f64 (/.f64 (-.f64 (.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 x-scale y-scale) (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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))))) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 -1/2 (/.f64 (.f64 (.f64 y-scale (.f64 x-scale (-.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))))) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) 2)))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (neg.f64 (.f64 (.f64 a a) (-.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 y-scale (-.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 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 y-scale (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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)))))))))))))) (pow.f64 b 6)) (/.f64 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 x-scale y-scale) (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 x-scale (+.f64 (/.f64 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) 2))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (neg.f64 (.f64 (.f64 a a) (-.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 y-scale (-.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (neg.f64 (/.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.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)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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))))))))))))) (pow.f64 b 6)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 x-scale (+.f64 (/.f64 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) 2))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (neg.f64 (.f64 (.f64 a a) (-.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 y-scale (-.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (neg.f64 (/.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.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)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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)))))))))) (pow.f64 b 4)) (.f64 1/2 (+.f64 (/.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 y-scale (-.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (neg.f64 (/.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.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)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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 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 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 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 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale (-.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 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 y-scale (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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 1/2 (+.f64 (/.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 y-scale (-.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (neg.f64 (/.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.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)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 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 (.f64 (.f64 y-scale (.f64 x-scale (-.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))))) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) 2)))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (neg.f64 (.f64 (.f64 a a) (-.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 y-scale (-.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 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 y-scale (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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))))))))))) (pow.f64 b 4)) (.f64 1/2 (+.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 y-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale (-.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 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 y-scale (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 x-scale (+.f64 (/.f64 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) 2))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (neg.f64 (.f64 (.f64 a a) (-.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 y-scale (-.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (neg.f64 (/.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.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)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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)))))))))) (pow.f64 b 4)) (.f64 1/2 (+.f64 (/.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 y-scale (-.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (neg.f64 (/.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.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)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 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 (.f64 (.f64 y-scale (.f64 x-scale (-.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))))) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) 2)))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (neg.f64 (.f64 (.f64 a a) (-.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 y-scale (-.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 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 y-scale (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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))))))))))) (pow.f64 b 4)) (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 y-scale (-.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 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 y-scale (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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 1/2 (+.f64 (/.f64 (-.f64 (.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 x-scale y-scale) (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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))))) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 -1/2 (/.f64 (.f64 (.f64 y-scale (.f64 x-scale (-.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))))) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) 2)))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (neg.f64 (.f64 (.f64 a a) (-.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 y-scale (-.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 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 y-scale (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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)))))))))))))) (pow.f64 b 6)) (/.f64 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 x-scale y-scale) (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 x-scale (+.f64 (/.f64 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) 2))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (neg.f64 (.f64 (.f64 a a) (-.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 y-scale (-.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (neg.f64 (/.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.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)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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))))))))))))) (pow.f64 b 6)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 x-scale (+.f64 (/.f64 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) 2))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (neg.f64 (.f64 (.f64 a a) (-.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 y-scale (-.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (neg.f64 (/.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.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)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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)))))))))) (pow.f64 b 4)) (.f64 1/2 (+.f64 (/.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 y-scale (-.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (neg.f64 (/.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.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)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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 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 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (.f64 (cos.f64 (.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 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 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 y-scale (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (.f64 -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 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)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) (.f64 (cos.f64 (.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 (.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 (/.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 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (.f64 b b) (pow.f64 (sin.f64 (.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale))) (pow.f64 y-scale 5))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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)) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (fma.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 y-scale (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (.f64 -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 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)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) (.f64 (cos.f64 (.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/8 (.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 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) 2)) (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale))) (pow.f64 y-scale 5))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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)) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (fma.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 y-scale (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (.f64 -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 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)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) (.f64 (cos.f64 (.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 (.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 (/.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 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (.f64 b b) (pow.f64 (sin.f64 (.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale))) (pow.f64 y-scale 5))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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)) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (fma.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 y-scale (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))))))) (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 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)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) (.f64 (cos.f64 (.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/4 (/.f64 (.f64 (.f64 x-scale (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 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)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (.f64 b b) (pow.f64 (sin.f64 (.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 -1/4 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.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 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) (.f64 (cos.f64 (.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/8 (.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 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) 2)) (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale))) (pow.f64 y-scale 5))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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)) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (fma.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 y-scale (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))))))) (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 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)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) (.f64 (cos.f64 (.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 x-scale (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 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)))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) 2)) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) 2) (.f64 -1/4 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.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 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) 2)))))))) 1/4) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) (.f64 (cos.f64 (.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 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 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 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))
(+.f64 (.f64 -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 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 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (.f64 1/2 (.f64 (/.f64 x-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 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))))))
(fma.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 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (/.f64 (.f64 1/2 x-scale) (/.f64 (.f64 y-scale (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.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 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))))))
(+.f64 (.f64 -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 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 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))))))) (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 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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 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 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a))))))))
(fma.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 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))))))) (fma.f64 -1/4 (/.f64 (.f64 (/.f64 x-scale (pow.f64 y-scale 3)) (-.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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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))))) 2))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (.f64 1/2 x-scale) (/.f64 (.f64 y-scale (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.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 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))))))
(+.f64 (.f64 -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 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 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))))))) (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 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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 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 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (.f64 1/8 (.f64 (.f64 x-scale (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 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 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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)))))) 2)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (pow.f64 y-scale 5)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) 2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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))))))))))))
(fma.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 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))))))) (fma.f64 -1/4 (/.f64 (.f64 (/.f64 x-scale (pow.f64 y-scale 3)) (-.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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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))))) 2))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 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 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (.f64 1/8 (.f64 (.f64 x-scale (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 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 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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)))))) 2)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (pow.f64 y-scale 5)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) 2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))))))
(.f64 -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 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 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))
(+.f64 (.f64 -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 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 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (.f64 1/2 (.f64 (/.f64 x-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 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))))))
(fma.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 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (/.f64 (.f64 1/2 x-scale) (/.f64 (.f64 y-scale (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.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 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))))))
(+.f64 (.f64 -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 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 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))))))) (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 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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 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 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a))))))))
(fma.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 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))))))) (fma.f64 -1/4 (/.f64 (.f64 (/.f64 x-scale (pow.f64 y-scale 3)) (-.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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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))))) 2))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (.f64 1/2 x-scale) (/.f64 (.f64 y-scale (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.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 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))))))
(+.f64 (.f64 -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 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 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))))))) (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 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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 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 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (.f64 1/8 (.f64 (.f64 x-scale (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 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 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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)))))) 2)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (pow.f64 y-scale 5)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) 2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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))))))))))))
(fma.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 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))))))) (fma.f64 -1/4 (/.f64 (.f64 (/.f64 x-scale (pow.f64 y-scale 3)) (-.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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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))))) 2))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 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 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (.f64 1/8 (.f64 (.f64 x-scale (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 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 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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)))))) 2)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (pow.f64 y-scale 5)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) 2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))))))
(.f64 -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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (*.f64 a a))))))
(+.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 (.f64 y-scale (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (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)))))))) 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 (/.f64 y-scale x-scale) (/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(+.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 (.f64 y-scale (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (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)))))))) 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))))) (fma.f64 -1/4 (/.f64 y-scale (/.f64 (.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))) (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 x-scale 3) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (/.f64 y-scale x-scale) (/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a))))))))
(fma.f64 1/2 (/.f64 (.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (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)))))))) 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))))) (fma.f64 -1/4 (/.f64 y-scale (/.f64 (.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))) (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 x-scale 3) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) 1/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 (/.f64 y-scale x-scale) (/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a))))))))
(+.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (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 y-scale (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.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 (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)) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (fma.f64 1/2 (/.f64 (.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (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)))))))) 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))))) (fma.f64 -1/4 (/.f64 y-scale (/.f64 (.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))) (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 x-scale 3) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (/.f64 y-scale x-scale) (/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (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 y-scale (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.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 (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)) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (fma.f64 1/2 (/.f64 (.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (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)))))))) 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))))) (fma.f64 -1/4 (/.f64 y-scale (/.f64 (.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))) (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 x-scale 3) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) 1/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 (/.f64 y-scale x-scale) (/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))))))))
(.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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (*.f64 a a))))))
(/.f64 (.f64 -1/2 y-scale) (/.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 b b) (.f64 a a)))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.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)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.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))))) (-.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.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))))) (-.f64 (.f64 b b) (.f64 a a))))) (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.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 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (-.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 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.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 -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 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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.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)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.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))))) (-.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (-.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 (.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.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 (.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.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))))) (-.f64 (.f64 b b) (.f64 a a))))) (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.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/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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale)))) (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.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 (.f64 1/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 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (-.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 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.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 -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 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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.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)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale)))) (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.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 (.f64 1/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 (.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.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))))) (-.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (-.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 (.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.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 (.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.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))))) (-.f64 (.f64 b b) (.f64 a a))))) (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.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 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (*.f64 a a))))))
(/.f64 (.f64 -1/2 y-scale) (/.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 b b) (.f64 a a)))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.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)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.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))))) (-.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.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))))) (-.f64 (.f64 b b) (.f64 a a))))) (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.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 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (-.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 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.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 -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 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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.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)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.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))))) (-.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (-.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 (.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.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 (.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.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))))) (-.f64 (.f64 b b) (.f64 a a))))) (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.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/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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale)))) (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.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 (.f64 1/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 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (-.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 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.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 -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 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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.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)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale)))) (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.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 (.f64 1/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 (.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.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))))) (-.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (-.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 (.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.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 (.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.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))))) (-.f64 (.f64 b b) (.f64 a a))))) (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.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 (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 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))))
(-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 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 (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 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (.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))) (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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))))))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (.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))) (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)))))))))
(-.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 (pow.f64 a 4) (.f64 (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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)))))))) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.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))) (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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))))))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))))
(-.f64 (fma.f64 -1/2 (.f64 (pow.f64 a 4) (.f64 (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))))) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.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))) (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4))))))))
(-.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 (pow.f64 a 4) (.f64 (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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)))))))) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 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 (.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))) (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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))))))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)))))) (.f64 1/4 (/.f64 (.f64 (.f64 (pow.f64 a 6) (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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))))))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))) 2)))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale)))))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))))
(-.f64 (fma.f64 -1/2 (.f64 (pow.f64 a 4) (.f64 (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))))) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 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 (.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))) (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)))))) (.f64 1/4 (/.f64 (.f64 (.f64 (pow.f64 a 6) (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))) 2)))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)))))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4))))))))
(.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (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 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-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 (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (*.f64 1/180 (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) (-.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 angle (.f64 1/180 (PI.f64)))) 2))) (-.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)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (fma.f64 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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))))))) 2)) (.f64 a a))))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(+.f64 (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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 -1/2 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) 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))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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)))))) (pow.f64 a 4)) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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))))))) 2)) (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (fma.f64 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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))))))) 2)) (.f64 a a))))))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))
(-.f64 (fma.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))) (pow.f64 a 4)) (/.f64 (+.f64 (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)))) (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) 2))) (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 -1/2 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) 2))) (.f64 a a)))))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (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 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-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 (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (*.f64 1/180 (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) (-.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 angle (.f64 1/180 (PI.f64)))) 2))) (-.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)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (fma.f64 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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))))))) 2)) (.f64 a a))))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(+.f64 (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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 -1/2 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) 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))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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)))))) (pow.f64 a 4)) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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))))))) 2)) (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (fma.f64 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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))))))) 2)) (.f64 a a))))))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))
(-.f64 (fma.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))) (pow.f64 a 4)) (/.f64 (+.f64 (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)))) (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) 2))) (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 -1/2 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) 2))) (.f64 a a)))))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 b b)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 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 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 1/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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.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 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-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 (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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 1/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 1/2 (/.f64 (fma.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-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 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 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 1/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 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 (.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 (.f64 1/32400 (.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 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-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 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 (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 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)) (.f64 2/45 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (.f64 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 1/2 (/.f64 (fma.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2)) (/.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) 2) (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 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 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 1/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 1/2 (/.f64 (fma.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-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 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 (.f64 1/32400 (.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 (.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 (.f64 1/32400 (.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 b b) (.f64 a a)) -1/8748000) (/.f64 (.f64 x-scale y-scale) (pow.f64 (PI.f64) 3))))))))) (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 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2))) (/.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) 2) (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.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 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 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 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 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 1/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 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 (.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 (.f64 1/32400 (.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 (.f64 1/32400 (.f64 b b)) (/.f64 (.f64 y-scale y-scale) (pow.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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-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 (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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(+.f64 (/.f64 (.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 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(+.f64 (/.f64 (.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 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(+.f64 (/.f64 (.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 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(+.f64 (/.f64 (.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 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(+.f64 (/.f64 (.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 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(+.f64 (/.f64 (.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 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(+.f64 (/.f64 (.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 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(+.f64 (/.f64 (.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 (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (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 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))
(-.f64 (/.f64 (.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 (.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 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))
(-.f64 (+.f64 (.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 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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 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 (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 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (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)) -8) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 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 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))))
(-.f64 (+.f64 (.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 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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) 2)))) (/.f64 (.f64 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 (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 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (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)) -8) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 b 4) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (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)) -8) (.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 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 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))
(-.f64 (+.f64 (.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))))) (pow.f64 b 6)) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) 2))) (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 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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)))))) (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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) 2)))) (/.f64 (.f64 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 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (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)) -8) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (pow.f64 b 6)) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (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)) -8) (.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))) (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 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (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)) -8) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 b 4) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (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)) -8) (.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 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 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (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 (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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(-.f64 (+.f64 (.f64 (pow.f64 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 (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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))
(-.f64 (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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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))))) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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 b 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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))
(-.f64 (fma.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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 b 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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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))))) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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 b 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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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))))) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) 2)) (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (pow.f64 b 4)))) (/.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))
(-.f64 (fma.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (+.f64 (/.f64 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) 2))) (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (pow.f64 b 4)))) (fma.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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 b 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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(-.f64 (+.f64 (.f64 (pow.f64 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 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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))
(-.f64 (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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 (fma.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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))))) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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 b 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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))
(-.f64 (fma.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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 b 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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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))))) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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 b 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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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))))) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) 2)) (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (pow.f64 b 4)))) (/.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))
(-.f64 (fma.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (+.f64 (/.f64 (.f64 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) 2))) (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (pow.f64 b 4)))) (fma.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 4 (pow.f64 a 4)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 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 b 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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (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)))))
(neg.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(+.f64 (.f64 -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 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 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))
(+.f64 (.f64 -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 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 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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 (.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 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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (.f64 b b) (pow.f64 (sin.f64 (.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2))) (neg.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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))))))))
(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 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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 (.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 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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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)))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) 2))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2))) (neg.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))))
(+.f64 (.f64 -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 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 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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 (.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 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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (.f64 b b) (pow.f64 (sin.f64 (.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2))) (fma.f64 -1 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 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 (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 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)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (.f64 b b) (pow.f64 (sin.f64 (.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 -1/4 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.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 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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 (.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 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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 (.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 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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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)))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) 2))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2))) (fma.f64 -1 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (/.f64 (.f64 1/2 (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 (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 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)))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) 2)) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) 2) (.f64 -1/4 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.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 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) 2))))))))))))
(.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.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 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 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (pow.f64 y-scale 4)))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))))
(+.f64 (/.f64 (.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 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (pow.f64 y-scale 4))))) (-.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 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))))))
(-.f64 (+.f64 (.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 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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) 2)))) (+.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (pow.f64 y-scale 4))))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))))
(.f64 -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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.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 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 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (pow.f64 y-scale 4)))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))))
(+.f64 (/.f64 (.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 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (pow.f64 y-scale 4))))) (-.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 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))))))
(-.f64 (+.f64 (.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 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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) 2)))) (+.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.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)) (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 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)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (pow.f64 y-scale 4))))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))))
(.f64 -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 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (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 angle (.f64 1/180 (PI.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (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/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 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))) (fma.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 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))) (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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 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 (.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) 1/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)))) (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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (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/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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (fma.f64 -1/2 (/.f64 (.f64 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 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))) (fma.f64 1/4 (/.f64 (.f64 (.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 4)) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (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 (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 (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))) (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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 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 (.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) 1/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)))) (fma.f64 1/4 (/.f64 (.f64 (.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 4)) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (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 (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 (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))) (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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (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 (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 angle (.f64 1/180 (PI.f64)))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 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 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 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 (.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.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 (-.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 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (.f64 x-scale x-scale)))))
(fma.f64 1/4 (/.f64 (.f64 (/.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.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 (-.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 (.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.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 (-.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 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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/2 (/.f64 (+.f64 (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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.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 -1/4 (/.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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) (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (-.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 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 8))) (neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (.f64 x-scale x-scale))))))
(fma.f64 1/4 (/.f64 (.f64 (/.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.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 (-.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 (.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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/2 (/.f64 (+.f64 (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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.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 -1/4 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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) (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (-.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 (.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 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 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 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 (.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.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 (-.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 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (.f64 x-scale x-scale)))))
(fma.f64 1/4 (/.f64 (.f64 (/.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.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 (-.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 (.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.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 (-.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 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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/2 (/.f64 (+.f64 (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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.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 -1/4 (/.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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) (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (-.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 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 8))) (neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (.f64 x-scale x-scale))))))
(fma.f64 1/4 (/.f64 (.f64 (/.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.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 (-.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 (.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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/2 (/.f64 (+.f64 (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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.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 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.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 -1/4 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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) (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (-.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 (.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.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 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) (.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 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) (.f64 y-scale x-scale))) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) (.f64 y-scale x-scale)) 2))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) (.f64 y-scale 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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale y-scale)) (.f64 (/.f64 (sqrt.f64 (+.f64 (pow.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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (*.f64 x-scale y-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 (+.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) (.f64 y-scale x-scale)) 2))))) (/.f64 1 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) (*.f64 y-scale 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))) (sqrt.f64 (+.f64 (pow.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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2)))) (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) x-scale)))
(.f64 1 (.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/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 1/180) (PI.f64))))) (/.f64 x-scale (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) y-scale))
(.f64 y-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))) (sqrt.f64 (+.f64 (pow.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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2)))) (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 x-scale (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 (sqrt.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/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 1/180) (PI.f64))))) (/.f64 x-scale (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) y-scale)) (sqrt.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/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 1/180) (PI.f64))))) (/.f64 x-scale (cos.f64 (.f64 (*.f64 angle 1/180) (PI.f64)))))) y-scale)))
(.f64 y-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))) (sqrt.f64 (+.f64 (pow.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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2)))) (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 x-scale (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 (.f64 (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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/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 1/180) (PI.f64))))) (/.f64 x-scale (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) y-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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/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 1/180) (PI.f64))))) (/.f64 x-scale (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) y-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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/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 1/180) (PI.f64))))) (/.f64 x-scale (cos.f64 (.f64 (*.f64 angle 1/180) (PI.f64)))))) y-scale)))
(.f64 y-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))) (sqrt.f64 (+.f64 (pow.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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2)))) (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 x-scale (cos.f64 (.f64 angle (*.f64 1/180 (PI.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/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 1/180) (PI.f64))))) (/.f64 x-scale (cos.f64 (.f64 (*.f64 angle 1/180) (PI.f64)))))) y-scale)
(.f64 y-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))) (sqrt.f64 (+.f64 (pow.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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2)))) (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 x-scale (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(pow.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/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 1/180) (PI.f64))))) (/.f64 x-scale (cos.f64 (.f64 (*.f64 angle 1/180) (PI.f64)))))) y-scale) 1)
(.f64 y-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))) (sqrt.f64 (+.f64 (pow.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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2)))) (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 x-scale (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(log.f64 (exp.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/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 1/180) (PI.f64))))) (/.f64 x-scale (cos.f64 (.f64 (*.f64 angle 1/180) (PI.f64)))))) y-scale)))
(.f64 y-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))) (sqrt.f64 (+.f64 (pow.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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2)))) (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 x-scale (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(cbrt.f64 (.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/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 1/180) (PI.f64))))) (/.f64 x-scale (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) y-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 (+.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/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 1/180) (PI.f64))))) (/.f64 x-scale (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) y-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 (+.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/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 1/180) (PI.f64))))) (/.f64 x-scale (cos.f64 (.f64 (*.f64 angle 1/180) (PI.f64)))))) y-scale)))
(cbrt.f64 (.f64 (.f64 y-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))) (sqrt.f64 (+.f64 (pow.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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2)))) (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (.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))) (sqrt.f64 (+.f64 (pow.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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2)))) (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.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))) (sqrt.f64 (+.f64 (pow.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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2)))) (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (*.f64 y-scale y-scale))))
(expm1.f64 (log1p.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/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 1/180) (PI.f64))))) (/.f64 x-scale (cos.f64 (.f64 (*.f64 angle 1/180) (PI.f64)))))) y-scale)))
(.f64 y-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))) (sqrt.f64 (+.f64 (pow.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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2)))) (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 x-scale (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(exp.f64 (log.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/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 1/180) (PI.f64))))) (/.f64 x-scale (cos.f64 (.f64 (*.f64 angle 1/180) (PI.f64)))))) y-scale)))
(.f64 y-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))) (sqrt.f64 (+.f64 (pow.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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2)))) (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 x-scale (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(log1p.f64 (expm1.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/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 1/180) (PI.f64))))) (/.f64 x-scale (cos.f64 (.f64 (*.f64 angle 1/180) (PI.f64)))))) y-scale)))
(.f64 y-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))) (sqrt.f64 (+.f64 (pow.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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2)))) (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 x-scale (cos.f64 (.f64 angle (*.f64 1/180 (PI.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))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) (.f64 y-scale x-scale)) 2)))))
(-.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))) (sqrt.f64 (+.f64 (pow.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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))) x-scale)) 2))))
(.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) (*.f64 y-scale x-scale)) 2))))))
(-.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))) (sqrt.f64 (+.f64 (pow.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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))) x-scale)) 2))))
(.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) (.f64 y-scale x-scale)) 2)))))) (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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) (*.f64 y-scale x-scale)) 2)))))))
(-.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))) (sqrt.f64 (+.f64 (pow.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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))) x-scale)) 2))))
(.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) (.f64 y-scale x-scale)) 2)))))) (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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) (.f64 y-scale x-scale)) 2))))))) (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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) (.f64 y-scale x-scale)) 2)))))))
(-.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))) (sqrt.f64 (+.f64 (pow.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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))) x-scale)) 2))))
(/.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 (pow.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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) (.f64 y-scale 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) (*.f64 y-scale 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))) (-.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 (pow.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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))) (+.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))) (sqrt.f64 (+.f64 (pow.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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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))) (-.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)))) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2)) (pow.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))) 2)) (+.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))) (sqrt.f64 (+.f64 (pow.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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))) x-scale)) 2)))))
(/.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 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) (.f64 y-scale x-scale)) 2))) 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 (pow.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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) (.f64 y-scale 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) (.f64 y-scale x-scale)) 2)))))))
(/.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 (sqrt.f64 (+.f64 (pow.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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))) 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 (pow.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))) 2) (+.f64 (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2) (.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))) (sqrt.f64 (+.f64 (pow.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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))))))
(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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) (.f64 y-scale x-scale)) 2))))) 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))) (sqrt.f64 (+.f64 (pow.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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))) x-scale)) 2))))
(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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) (.f64 y-scale x-scale)) 2)))))))
(-.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))) (sqrt.f64 (+.f64 (pow.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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))) x-scale)) 2))))
(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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) (.f64 y-scale x-scale)) 2))))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) (.f64 y-scale x-scale)) 2)))))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) (.f64 y-scale x-scale)) 2)))))))
(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))) (sqrt.f64 (+.f64 (pow.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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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))) (sqrt.f64 (+.f64 (pow.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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2)))) (-.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))) (sqrt.f64 (+.f64 (pow.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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))) x-scale)) 2)))))))
(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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) (.f64 y-scale x-scale)) 2)))))))
(-.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))) (sqrt.f64 (+.f64 (pow.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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))) x-scale)) 2))))
(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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) (.f64 y-scale x-scale)) 2)))))))
(-.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))) (sqrt.f64 (+.f64 (pow.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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))) x-scale)) 2))))
(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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) (.f64 y-scale x-scale)) 2)))))))
(-.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))) (sqrt.f64 (+.f64 (pow.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))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 2 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))) x-scale)) 2))))

eval27.7s (18.5%)

Compiler: Compiled 925802 to 565916 computations (38.9% saved)

prune2.1s (1.4%)

Pruning

40 alts after pruning (40 fresh and 0 done)

	Pruned	Kept	Total
New	2470	40	2510
Fresh	0	0	0
Picked	1	0	1
Done	4	0	4
Total	2475	40	2515

Accurracy

61.8%

Counts

2515 → 40

Alt Table

Click to see full alt table

Status	Accuracy	Program
	3.5%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (/.f64 (/.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)))))))) (.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)))))))))
	15.7%	(.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 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.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)))))))))
▶	15.6%	(.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 1 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))))))
	12.6%	(.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)))))))))
	20.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)))))))))
	7.8%	(.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)))))))))
	4.4%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (.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)))))))))))
	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))))))))))
	5.5%	(.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)))))))))))
▶	17.7%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (.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))))))))))
	20.1%	(.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))))))))))
	10.8%	(.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 a a) (.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)))
	8.3%	(.f64 (atan.f64 (.f64 y-scale (.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 180 (PI.f64)))
	7.1%	(.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)))
	26.3%	(.f64 (atan.f64 (.f64 y-scale (.f64 1/2 (/.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))))) (/.f64 180 (PI.f64)))
	6.5%	(.f64 (atan.f64 (.f64 y-scale (.f64 1/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 (.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 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (.f64 (.f64 b b) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))) (/.f64 180 (PI.f64)))
	27.1%	(.f64 (atan.f64 (.f64 y-scale (.f64 -1/2 (/.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 x-scale (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 180 (PI.f64)))
	4.4%	(.f64 (atan.f64 (.f64 y-scale (.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 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 180 (PI.f64)))
	19.2%	(.f64 (atan.f64 (.f64 y-scale (.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 180 (PI.f64)))
	21.4%	(.f64 (atan.f64 (.f64 y-scale (.f64 -1/2 (.f64 (/.f64 x-scale (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 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))) (/.f64 180 (PI.f64)))
	6.1%	(.f64 180 (/.f64 (atan.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale)))))))) (/.f64 (/.f64 (.f64 (.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.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 (+.f64 1 (.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 2) (.f64 angle angle))))) 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.3%	(.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 a a) (.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)))
	8.6%	(.f64 180 (/.f64 (atan.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 (.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)))
	27.7%	(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 -1/2 y-scale) (/.f64 (.f64 (.f64 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 (.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))))))) (PI.f64)))
	5.3%	(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 -1/2 y-scale) (/.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 b b) (.f64 a a)))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (fma.f64 4 (/.f64 (.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)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))))) (PI.f64)))
	13.4%	(.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (/.f64 (/.f64 (.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.9%	(.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 1 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))))))) (.f64 y-scale x-scale))) (PI.f64)))
	9.5%	(.f64 180 (/.f64 (atan.f64 (.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 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)))
	18.6%	(.f64 180 (/.f64 (atan.f64 (.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 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)))
	22.9%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 (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 (-.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)))
	18.2%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 (neg.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 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)))
	7.0%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 (.f64 (.f64 x-scale y-scale) (.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 a) (-.f64 b a))))))) (PI.f64)))
▶	8.2%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (/.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))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))) (PI.f64)))
	27.5%	(.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)))
▶	27.1%	(.f64 180 (/.f64 (atan.f64 (.f64 1/2 (/.f64 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale (-.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))) (PI.f64)))
	21.0%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))) (PI.f64)))
▶	29.2%	(.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a))))))) (PI.f64)))
	19.6%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 y-scale (.f64 2 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (PI.f64)))
	12.3%	(.f64 180 (/.f64 (atan.f64 (log.f64 (exp.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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/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 1/180) (PI.f64))))) (/.f64 x-scale (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) y-scale)))) (PI.f64)))

Compiler

Compiled 9304 to 6068 computations (34.8% saved)

localize205.0ms (0.1%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	88.4%	(.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))
✓	59.2%	(cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))
✓	58.7%	(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
✓	51.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 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (*.f64 a a))))

Compiler

Compiled 586 to 335 computations (42.8% saved)

series18.0ms (0%)

Counts

4 → 96

Calls

24 calls:

Time	Variable		Point	Expression
4.0ms	angle	@	0	(/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (*.f64 a a))))
3.0ms	a	@	inf	(/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (*.f64 a a))))
1.0ms	angle	@	inf	(/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (*.f64 a a))))
1.0ms	b	@	0	(/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (*.f64 a a))))
1.0ms	b	@	inf	(/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (*.f64 a a))))

rewrite174.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	296
1	579	278
2	7813	278

Stop Event

1×	node limit

Counts

4 → 120

Calls

Call 1

Inputs
(/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))

Outputs
(((-.f64 (exp.f64 (log1p.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 1 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 1 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (/.f64 1 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))) (cbrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle 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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (cbrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 2)) (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) 2) (.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (/.f64 1 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (/.f64 1 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (neg.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (/.f64 1 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (/.f64 1 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) 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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (/.f64 1 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) 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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (/.f64 1 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.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 1/180 (PI.f64)) (+.f64 angle angle))))) 2))) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.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 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 2)) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) 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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) 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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) 1) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (pow.f64 (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 2)) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) 2) (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) 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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) 2) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) 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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) 2) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) 2) 1) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) 2) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) 2) (pow.f64 (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 2)) (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((pow.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle 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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((pow.f64 (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle 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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((pow.f64 (/.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) 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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((neg.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle 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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((log.f64 (exp.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((cbrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle 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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((cbrt.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) 3) (pow.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle 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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((expm1.f64 (log1p.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((exp.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((exp.f64 (.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))) 1)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((log1p.f64 (expm1.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (*.f64 a a)))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 1 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((pow.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((pow.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((pow.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 3) 1/3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((sqrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((fabs.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((log.f64 (exp.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((cbrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 3)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((expm1.f64 (log1p.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((exp.f64 (log.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((exp.f64 (.f64 (log.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 1)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((log1p.f64 (expm1.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 1 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (sqrt.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (cbrt.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (cbrt.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (pow.f64 (cbrt.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((pow.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) 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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((pow.f64 (sqrt.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((pow.f64 (cbrt.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((pow.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 3) 1/3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((sqrt.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((fabs.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((log.f64 (exp.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((cbrt.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 3)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((expm1.f64 (log1p.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((exp.f64 (log.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((exp.f64 (.f64 (log.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 1)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((log1p.f64 (expm1.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)))
(((+.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) (fma.f64 (neg.f64 a) a (.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((+.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2) (.f64 (fma.f64 (neg.f64 a) a (.f64 a a)) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((+.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) (.f64 b b)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) (.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((+.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) (.f64 a (neg.f64 a))) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) (.f64 b b))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((+.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) (fma.f64 (neg.f64 a) a (.f64 a a))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((+.f64 (.f64 (.f64 b b) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)) (.f64 (.f64 a (neg.f64 a)) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((+.f64 (.f64 (.f64 a (neg.f64 a)) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)) (.f64 (.f64 b b) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((+.f64 (.f64 (fma.f64 (neg.f64 a) a (.f64 a a)) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((-.f64 (exp.f64 (log1p.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((/.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((/.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((/.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) (-.f64 (.f64 b b) (.f64 a 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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((/.f64 (.f64 (-.f64 (pow.f64 b 4) (pow.f64 a 4)) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)) (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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((/.f64 (.f64 (-.f64 (pow.f64 b 6) (pow.f64 a 6)) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((/.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) (-.f64 (pow.f64 b 4) (pow.f64 a 4))) (.f64 2 (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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((/.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) (-.f64 (pow.f64 b 6) (pow.f64 a 6))) (.f64 2 (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((/.f64 (.f64 (-.f64 (pow.f64 b 4) (pow.f64 a 4)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) (.f64 (fma.f64 b b (.f64 a 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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((/.f64 (.f64 (-.f64 (pow.f64 b 6) (pow.f64 a 6)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) (.f64 (+.f64 (pow.f64 b 4) (+.f64 (pow.f64 a 4) (pow.f64 (.f64 b a) 2))) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((pow.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((pow.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle 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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((pow.f64 (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle 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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((pow.f64 (pow.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((sqrt.f64 (pow.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle 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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((log.f64 (pow.f64 (sqrt.f64 (exp.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle 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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((cbrt.f64 (pow.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle 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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((cbrt.f64 (.f64 (pow.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) 3) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 3))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((cbrt.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 3) (pow.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) 3))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((expm1.f64 (log1p.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((exp.f64 (log.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((exp.f64 (.f64 (log.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 1)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)) ((log1p.f64 (expm1.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a)))) #f)))

simplify201.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

1346×	`associate-r`
1154×	`associate-/r*`
1000×	`associate-l`
794×	`*-commutative`
724×	`associate-/l*`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	604	27816
1	1909	26644

Stop Event

1×	node limit

Counts

216 → 281

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/180 (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))
(+.f64 (.f64 (pow.f64 angle 3) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))))) (.f64 1/180 (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))
(+.f64 (.f64 (pow.f64 angle 3) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))))) (+.f64 (.f64 (pow.f64 angle 5) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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 1/180 (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))
(+.f64 (.f64 (pow.f64 angle 3) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))))) (+.f64 (.f64 (pow.f64 angle 5) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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 1/180 (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 (pow.f64 angle 7) (.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))))) (-.f64 (pow.f64 b 2) (pow.f64 a 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (cos.f64 (.f64 1/180 (.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 (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 (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 (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 (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 (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 (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 (pow.f64 a 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)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(+.f64 (.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 (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 (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 (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 (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 (pow.f64 a 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)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(+.f64 (.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 (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 (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 (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 (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 (pow.f64 a 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)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(+.f64 (.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 (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 (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 (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 (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 (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 (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) (.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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(-.f64 (exp.f64 (log1p.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)))) 1)
(.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 1 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)))
(.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 1)
(.f64 1 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)))
(.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))))
(.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (/.f64 1 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))))
(.f64 (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))) (cbrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 2)))
(.f64 (cbrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 2)) (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))))
(.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) 2) (.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (/.f64 1 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))))
(.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 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 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))) 2))))
(.f64 (neg.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (/.f64 1 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) (neg.f64 (-.f64 (.f64 b b) (.f64 a a))))))
(.f64 (/.f64 1 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 (/.f64 1 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) 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 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (/.f64 1 (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 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 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 2)) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))))
(.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 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 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 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 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (-.f64 (.f64 b b) (.f64 a a))))
(.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) 1) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)))
(.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (pow.f64 (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 2)) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) 2) (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) 2) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (-.f64 (.f64 b b) (.f64 a a))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) 2) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) 2) 1) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) 2) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) 2) (pow.f64 (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 2)) (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))))
(pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 1)
(pow.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))) 2)
(pow.f64 (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))) 3)
(pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 3) 1/3)
(pow.f64 (/.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (-.f64 (.f64 b b) (.f64 a a)))) -1)
(neg.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) (neg.f64 (-.f64 (.f64 b b) (*.f64 a a))))))
(sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 2))
(log.f64 (exp.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)))))
(cbrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 3))
(cbrt.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) 3) (pow.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2) 3)))
(expm1.f64 (log1p.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))))
(exp.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))))
(exp.f64 (.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))) 1))
(log1p.f64 (expm1.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))))
(-.f64 (exp.f64 (log1p.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))) 1)
(.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))) 1)
(.f64 1 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))))
(.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (cbrt.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))))
(.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))) 2))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))) 2)))
(pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 1)
(pow.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) 1/2)
(pow.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)
(pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 3)
(pow.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 3) 1/3)
(sqrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))
(fabs.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))
(log.f64 (exp.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(log.f64 (+.f64 1 (expm1.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))))
(cbrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 3))
(expm1.f64 (log1p.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(exp.f64 (log.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(exp.f64 (.f64 (log.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))) 1))
(log1p.f64 (expm1.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(-.f64 (exp.f64 (log1p.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))))) 1)
(.f64 (cos.f64 (.f64 1/180 (*.f64 (PI.f64) angle))) 1)
(.f64 1 (cos.f64 (.f64 1/180 (*.f64 (PI.f64) angle))))
(.f64 (sqrt.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (cos.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))))
(.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (cbrt.f64 (cos.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))))
(.f64 (cbrt.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (pow.f64 (cbrt.f64 (cos.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))) 2))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))) 2)))
(pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 1)
(pow.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) 1/2)
(pow.f64 (sqrt.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)
(pow.f64 (cbrt.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 3)
(pow.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 3) 1/3)
(sqrt.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))
(fabs.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))))
(log.f64 (exp.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(log.f64 (+.f64 1 (expm1.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))))))
(cbrt.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 3))
(expm1.f64 (log1p.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(exp.f64 (log.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(exp.f64 (.f64 (log.f64 (cos.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))) 1))
(log1p.f64 (expm1.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(+.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) (fma.f64 (neg.f64 a) a (.f64 a a))))
(+.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2) (.f64 (fma.f64 (neg.f64 a) a (.f64 a a)) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(+.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) (.f64 b b)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) (.f64 a (neg.f64 a))))
(+.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) (.f64 a (neg.f64 a))) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) (.f64 b b)))
(+.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) (fma.f64 (neg.f64 a) a (.f64 a a))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))
(+.f64 (.f64 (.f64 b b) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)) (.f64 (.f64 a (neg.f64 a)) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(+.f64 (.f64 (.f64 a (neg.f64 a)) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)) (.f64 (.f64 b b) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(+.f64 (.f64 (fma.f64 (neg.f64 a) a (.f64 a a)) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))
(-.f64 (exp.f64 (log1p.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))) 1)
(/.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) (-.f64 (pow.f64 b 4) (pow.f64 a 4))) (fma.f64 b b (*.f64 a a)))
(/.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 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 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)
(/.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) (-.f64 (.f64 b b) (*.f64 a a))) 2)
(/.f64 (.f64 (-.f64 (pow.f64 b 4) (pow.f64 a 4)) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)) (fma.f64 b b (*.f64 a a)))
(/.f64 (.f64 (-.f64 (pow.f64 b 6) (pow.f64 a 6)) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)) (+.f64 (pow.f64 b 4) (+.f64 (pow.f64 a 4) (pow.f64 (*.f64 b a) 2))))
(/.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) (-.f64 (pow.f64 b 4) (pow.f64 a 4))) (.f64 2 (fma.f64 b b (*.f64 a a))))
(/.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) (-.f64 (pow.f64 b 6) (pow.f64 a 6))) (.f64 2 (+.f64 (pow.f64 b 4) (+.f64 (pow.f64 a 4) (pow.f64 (*.f64 b a) 2)))))
(/.f64 (.f64 (-.f64 (pow.f64 b 4) (pow.f64 a 4)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) (.f64 (fma.f64 b b (*.f64 a a)) 2))
(/.f64 (.f64 (-.f64 (pow.f64 b 6) (pow.f64 a 6)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) (.f64 (+.f64 (pow.f64 b 4) (+.f64 (pow.f64 a 4) (pow.f64 (*.f64 b a) 2))) 2))
(pow.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2) 1)
(pow.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 2)
(pow.f64 (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 3)
(pow.f64 (pow.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2) 3) 1/3)
(sqrt.f64 (pow.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2) 2))
(log.f64 (pow.f64 (sqrt.f64 (exp.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))))) (-.f64 (.f64 b b) (.f64 a a))))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))))
(cbrt.f64 (pow.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2) 3))
(cbrt.f64 (.f64 (pow.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) 3) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 3)))
(cbrt.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 3) (pow.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) 3)))
(expm1.f64 (log1p.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)))
(exp.f64 (log.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)))
(exp.f64 (.f64 (log.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 1))
(log1p.f64 (expm1.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)))

Outputs
(.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)))))))
(fma.f64 (+.f64 (.f64 -2 (/.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)))) (.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)))))))
(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 (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)))) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 b b) (+.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 (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)))) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.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 -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 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 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 (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)))) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 b b) (+.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 (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)))) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 a a) (pow.f64 b 4))))) (/.f64 (+.f64 (.f64 -2 (/.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)))) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.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 -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 a (/.f64 (pow.f64 b 4) 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 (.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 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.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 b b)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 a (/.f64 (.f64 b b) a)))) (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 a (/.f64 (*.f64 b b) 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 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 2 (/.f64 (.f64 a a) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.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 b 4) (.f64 a a))) (+.f64 (.f64 2 (+.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.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 b b)) (/.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 (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 a (/.f64 (.f64 b b) a)))) (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 a (/.f64 (.f64 b b) a))))) (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))) (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 (+.f64 (.f64 2 (/.f64 (.f64 a a) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.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 b 4) (.f64 a a))) (-.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 (.f64 a a) (.f64 b b)) (/.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 a a) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.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 b 6) (pow.f64 a 4))))) (.f64 -2 (.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.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 a (/.f64 (.f64 b b) a))) (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))) (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))) (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 a (/.f64 (.f64 b b) 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 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 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.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 b b)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 a (/.f64 (.f64 b b) a)))) (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 a (/.f64 (*.f64 b b) 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 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 2 (/.f64 (.f64 a a) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.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 b 4) (.f64 a a))) (+.f64 (.f64 2 (+.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.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 b b)) (/.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 (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 a (/.f64 (.f64 b b) a)))) (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 a (/.f64 (.f64 b b) a))))) (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))) (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 (+.f64 (.f64 2 (/.f64 (.f64 a a) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.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 b 4) (.f64 a a))) (-.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 (.f64 a a) (.f64 b b)) (/.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 a a) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.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 b 6) (pow.f64 a 4))))) (.f64 -2 (.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.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 a (/.f64 (.f64 b b) a))) (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))) (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))) (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 a (/.f64 (.f64 b b) a))))))
(.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 b b) (.f64 angle (.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 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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -64800 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 b b))))) (.f64 360 (/.f64 (.f64 b b) (.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 a a) 1/16200) (.f64 (.f64 b b) -1/16200))) (.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)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 b b)) -64800)) (.f64 360 (/.f64 (.f64 b b) (.f64 angle (.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 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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -64800 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 b b))))) (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 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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -64800 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 b b))))) (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 b b) (.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 a a) 1/16200) (.f64 (.f64 b b) -1/16200))) (.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)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 b b)) -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 (.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 a a) 1/16200) (.f64 (.f64 b b) -1/16200))) (.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)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 b b)) -64800))))) (.f64 -64800 (/.f64 (/.f64 (.f64 b b) (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 5) 1/1417176000000)))) (pow.f64 (PI.f64) 2)))) (.f64 360 (/.f64 (.f64 b b) (.f64 angle (.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 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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -64800 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 b b))))) (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 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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -64800 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 b b))))) (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)))))) (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 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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -64800 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 b b))))) (PI.f64))) (fma.f64 180 (/.f64 (.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (-.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 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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -64800 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 b b))))) (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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.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 360 (/.f64 (.f64 b b) (.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 a a) 1/16200) (.f64 (.f64 b b) -1/16200))) (.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)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 b b)) -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 (.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 a a) 1/16200) (.f64 (.f64 b b) -1/16200))) (.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)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 b b)) -64800))))) (.f64 -64800 (/.f64 (/.f64 (.f64 b b) (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 5) 1/1417176000000)))) (pow.f64 (PI.f64) 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 b b) (.f64 a a)) (.f64 (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 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 b b)) -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 (.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 a a) 1/16200) (.f64 (.f64 b b) -1/16200))) (.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)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 b b)) -64800))))) (.f64 -64800 (/.f64 (/.f64 (.f64 b b) (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 5) 1/1417176000000)))) (pow.f64 (PI.f64) 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 b) (.f64 angle (.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 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 a a) (pow.f64 (sin.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 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 (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 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 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 a a) (pow.f64 (sin.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 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 (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 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 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 a a) (pow.f64 (sin.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 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 (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 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 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 a a) (pow.f64 (sin.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 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 (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 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 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 a a) (pow.f64 (sin.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 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 (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 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 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 a a) (pow.f64 (sin.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 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 (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 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 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 a a) (pow.f64 (sin.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 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 (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 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 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 a a) (pow.f64 (sin.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 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 (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 (/.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)))))))
(fma.f64 (fma.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b))) (neg.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)))))) (.f64 a a) (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.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 (.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 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b))) (neg.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)))))) (.f64 a a) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b))) (neg.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)))))) (/.f64 (*.f64 b b) (pow.f64 a 4))))
(+.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 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b))) (neg.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)))))) (.f64 a a) (+.f64 (/.f64 (fma.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b))) (neg.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)))))) (/.f64 (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 (fma.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b))) (neg.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)))))) (/.f64 (.f64 b b) (pow.f64 a 4))))))
(+.f64 (+.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 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)))) (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 -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 -2 (+.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (.f64 b b))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.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 -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 b (/.f64 (*.f64 a a) b)))))
(-.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (.f64 (sin.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)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (+.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (pow.f64 a 4) (.f64 b b))))) (.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 -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 (.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))))))) (pow.f64 a 4)) (.f64 b b))) (.f64 -2 (.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 b (/.f64 (*.f64 a a) b)))))
(-.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (.f64 b b))) (+.f64 (/.f64 (+.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (pow.f64 a 4) (.f64 b b))) (fma.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (pow.f64 b 4) (/.f64 (pow.f64 a 6) (+.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))) (.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 (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 (.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))))))) (pow.f64 a 4)) (.f64 b b)) (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 b (/.f64 (.f64 a a) 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 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (.f64 b b))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.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 -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 b (/.f64 (*.f64 a a) b)))))
(-.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (.f64 (sin.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)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (+.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (pow.f64 a 4) (.f64 b b))))) (.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 -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 (.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))))))) (pow.f64 a 4)) (.f64 b b))) (.f64 -2 (.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 b (/.f64 (*.f64 a a) b)))))
(-.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (.f64 b b))) (+.f64 (/.f64 (+.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (pow.f64 a 4) (.f64 b b))) (fma.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (pow.f64 b 4) (/.f64 (pow.f64 a 6) (+.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))) (.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 (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 (.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))))))) (pow.f64 a 4)) (.f64 b b)) (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 b (/.f64 (.f64 a a) b)))))
(.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)))))
(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 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/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))))))
(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 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))
(.f64 1/180 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 (.f64 1/180 (.f64 angle (PI.f64))) (-.f64 (.f64 b b) (*.f64 a a)))
(+.f64 (.f64 (pow.f64 angle 3) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))))) (.f64 1/180 (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))
(fma.f64 (pow.f64 angle 3) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 1/180 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))
(fma.f64 (pow.f64 angle 3) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 (.f64 1/180 (.f64 angle (PI.f64))) (-.f64 (.f64 b b) (*.f64 a a))))
(+.f64 (.f64 (pow.f64 angle 3) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))))) (+.f64 (.f64 (pow.f64 angle 5) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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 1/180 (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))
(fma.f64 (pow.f64 angle 3) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (fma.f64 (pow.f64 angle 5) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000))) (.f64 1/180 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))
(fma.f64 (pow.f64 angle 3) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (fma.f64 (pow.f64 angle 5) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 5) 1/1417176000000)) (.f64 (.f64 1/180 (.f64 angle (PI.f64))) (-.f64 (.f64 b b) (*.f64 a a)))))
(+.f64 (.f64 (pow.f64 angle 3) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))))) (+.f64 (.f64 (pow.f64 angle 5) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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 1/180 (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 (pow.f64 angle 7) (.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))))) (-.f64 (pow.f64 b 2) (pow.f64 a 2)))))))
(fma.f64 (pow.f64 angle 3) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (fma.f64 (pow.f64 angle 5) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000))) (fma.f64 1/180 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (pow.f64 angle 7) (.f64 (-.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))))))))
(fma.f64 (pow.f64 angle 3) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (fma.f64 (pow.f64 angle 5) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 5) 1/1417176000000)) (fma.f64 1/180 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 angle 7) (fma.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7) (*.f64 (pow.f64 (PI.f64) 7) -19/10285296537600000000)))))))
(.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -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)))))))
(neg.f64 (.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (*.f64 a (neg.f64 a)))
(+.f64 (.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 (pow.f64 a 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)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))
(+.f64 (.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 (pow.f64 a 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)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))
(+.f64 (.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 (pow.f64 a 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)))) (.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 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b b)))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b b)))
(+.f64 (.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 (pow.f64 a 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)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))
(+.f64 (.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 (pow.f64 a 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)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))
(+.f64 (.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 (pow.f64 a 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)))) (.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 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b b)))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b b)))
(+.f64 (.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 (pow.f64 a 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)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))
(+.f64 (.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 (pow.f64 a 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)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))
(+.f64 (.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 (pow.f64 a 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)))) (.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 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b b)))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b b)))
(+.f64 (.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 (pow.f64 a 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)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))
(+.f64 (.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 (pow.f64 a 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)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))
(+.f64 (.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 (pow.f64 a 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)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))
(.f64 -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)))))))
(neg.f64 (.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (*.f64 a (neg.f64 a)))
(+.f64 (.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 (pow.f64 a 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)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))
(+.f64 (.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 (pow.f64 a 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)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))
(+.f64 (.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 (pow.f64 a 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)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))
(.f64 -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)))))))
(neg.f64 (.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (*.f64 a (neg.f64 a)))
(+.f64 (.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 (pow.f64 a 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)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))
(+.f64 (.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 (pow.f64 a 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)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))
(+.f64 (.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 (pow.f64 a 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)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))
(-.f64 (exp.f64 (log1p.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)))) 1)
(.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 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) (+.f64 angle angle))))))) 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 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))))
(.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 1 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle 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))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) (+.f64 angle angle))))))) 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 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))))
(.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 1)
(.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 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) (+.f64 angle angle))))))) 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 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))))
(.f64 1 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle 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))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) (+.f64 angle angle))))))) 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 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))))
(.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 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 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) (+.f64 angle angle))))))))) 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) (+.f64 0 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90)))))) 2)
(.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (/.f64 1 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle 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 (.f64 (/.f64 1 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))))) 2) (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 (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)) (+.f64 0 (sin.f64 (.f64 (.f64 angle (PI.f64)) 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 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))) (cbrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 2)))
(.f64 (cbrt.f64 (.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 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))))) 2)) (cbrt.f64 (pow.f64 (.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 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) (+.f64 angle angle))))))) 2) 2)))
(.f64 (cbrt.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 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90))))))) (cbrt.f64 (pow.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 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90)))))) 2)))
(.f64 (cbrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 2)) (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))))
(.f64 (cbrt.f64 (.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 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))))) 2)) (cbrt.f64 (pow.f64 (.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 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) (+.f64 angle angle))))))) 2) 2)))
(.f64 (cbrt.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 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90))))))) (cbrt.f64 (pow.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 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90)))))) 2)))
(.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) 2) (.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (/.f64 1 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))))
(.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 (.f64 (/.f64 1 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))))) 2) (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 (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 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90))))) (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 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)) (/.f64 1 (-.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))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) (+.f64 angle angle))))))) 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 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))))
(.f64 (/.f64 1 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (*.f64 (PI.f64) 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))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) (+.f64 angle angle))))))) 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 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))))
(.f64 (neg.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (/.f64 1 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) (neg.f64 (-.f64 (.f64 b b) (.f64 a a))))))
(.f64 (neg.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 1 (.f64 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))) (.f64 1/2 (neg.f64 (-.f64 (.f64 b b) (.f64 a a)))))))
(.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))) (neg.f64 (/.f64 (/.f64 2 (+.f64 0 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90)))) (*.f64 (+.f64 a b) (neg.f64 (-.f64 b a))))))
(.f64 (/.f64 1 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 (/.f64 1 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (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 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (-.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))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) (+.f64 angle angle))))))) 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 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))))
(.f64 (/.f64 1 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/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 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) (+.f64 angle angle))))))) 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 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))))
(.f64 (/.f64 1 (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))))
(.f64 (/.f64 1 (sqrt.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))))))) (/.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 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))))))))
(/.f64 (/.f64 1 (sqrt.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (+.f64 0 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90)))))) (/.f64 (sqrt.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (+.f64 0 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90))))) (+.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 1 (pow.f64 (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 2)) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle 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))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) (+.f64 angle angle))))))) 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 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))))
(.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 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 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 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))) (.f64 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 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 0 (.f64 1/2 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90)))) (-.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 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 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 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 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))) 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 (.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 (pow.f64 b 4) (+.f64 (pow.f64 a 4) (pow.f64 (.f64 a b) 2)))) (+.f64 0 (.f64 1/2 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90))))) (-.f64 (pow.f64 b 6) (pow.f64 a 6)))
(.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) 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 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 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 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))) 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 (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 0 (.f64 1/2 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90))))) (/.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 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.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 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))) 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 (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 0 (.f64 1/2 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90))))) (/.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 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) 1) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle 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 (/.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 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) (+.f64 angle 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 (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 (-.f64 (.f64 b b) (.f64 a a)) 2) (+.f64 0 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90))))))
(.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (pow.f64 (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 2)) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle 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 (/.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 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) (+.f64 angle 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 (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 (-.f64 (.f64 b b) (.f64 a a)) 2) (+.f64 0 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) 2) (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) 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) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) 2) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 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) (.f64 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))) 1/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 (.f64 b b) (.f64 a a))))
(/.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 (-.f64 (.f64 b b) (.f64 a a)) (/.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 0 (.f64 1/2 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90)))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) 2) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/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) (.f64 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))) 1/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 (.f64 b b) (.f64 a a))))
(/.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 (-.f64 (.f64 b b) (.f64 a a)) (/.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 0 (.f64 1/2 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90)))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) 2) 1) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)))
(.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 (/.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 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) (+.f64 angle angle))))))) 2))
(.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 (/.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 0 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90)))) (/.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) 2) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle 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 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))))))) (/.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 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) (+.f64 angle angle))))))))))
(.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) (+.f64 0 (sin.f64 (.f64 (.f64 angle (PI.f64)) 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) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90)))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) 2) (pow.f64 (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 2)) (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))))
(.f64 (cbrt.f64 (.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 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))))) 2)) (/.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 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) (+.f64 angle angle)))))))) 2)))
(/.f64 (.f64 (cbrt.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 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90))))))) (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) (+.f64 0 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90))))) 2))
(pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 1)
(.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 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) (+.f64 angle angle))))))) 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 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))))
(pow.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)))) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle 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 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) (+.f64 angle angle))))))))) 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) (+.f64 0 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90)))))) 2)
(pow.f64 (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))) 3)
(.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 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) (+.f64 angle angle))))))) 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 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))))
(pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 3) 1/3)
(.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 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) (+.f64 angle angle))))))) 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 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))))
(pow.f64 (/.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (-.f64 (.f64 b b) (.f64 a a)))) -1)
(.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 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) (+.f64 angle angle))))))) 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 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))))
(neg.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 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 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))) (.f64 1/2 (neg.f64 (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (neg.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 0 (sin.f64 (.f64 (.f64 angle (PI.f64)) 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 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 2))
(sqrt.f64 (pow.f64 (.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 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) (+.f64 angle angle))))))) 2) 2))
(sqrt.f64 (pow.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 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90)))))) 2))
(log.f64 (exp.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle 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))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) (+.f64 angle angle))))))) 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 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle 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))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) (+.f64 angle angle))))))) 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 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))))
(cbrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 3))
(.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 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) (+.f64 angle angle))))))) 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 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))))
(cbrt.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) 3) (pow.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2) 3)))
(.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 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) (+.f64 angle angle))))))) 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 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))))
(expm1.f64 (log1p.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle 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))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) (+.f64 angle angle))))))) 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 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))))
(exp.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle 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))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) (+.f64 angle angle))))))) 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 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))))
(exp.f64 (.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))) 1))
(.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 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) (+.f64 angle angle))))))) 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 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))))
(log1p.f64 (expm1.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle 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))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) (+.f64 angle angle))))))) 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 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))))
(-.f64 (exp.f64 (log1p.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))) 1)
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))) 1)
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 1 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (cbrt.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))) 2))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) 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 1/180 (.f64 (PI.f64) angle))) 1)
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(pow.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) 1/2)
(sqrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))
(pow.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 3)
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(pow.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 3) 1/3)
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sqrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))
(sqrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))
(fabs.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))
(fabs.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(log.f64 (exp.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(log.f64 (+.f64 1 (expm1.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cbrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 3))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(expm1.f64 (log1p.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(exp.f64 (log.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(exp.f64 (.f64 (log.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))) 1))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(log1p.f64 (expm1.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(-.f64 (exp.f64 (log1p.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))))) 1)
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (cos.f64 (.f64 1/180 (*.f64 (PI.f64) angle))) 1)
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 1 (cos.f64 (.f64 1/180 (*.f64 (PI.f64) angle))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (sqrt.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (cos.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (cbrt.f64 (cos.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (cbrt.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (pow.f64 (cbrt.f64 (cos.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))) 2))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 1/180 (*.f64 (PI.f64) 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 1/180 (.f64 (PI.f64) angle))) 1)
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(pow.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) 1/2)
(sqrt.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))
(pow.f64 (sqrt.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(pow.f64 (cbrt.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 3)
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(pow.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 3) 1/3)
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sqrt.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))
(sqrt.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))
(fabs.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))))
(fabs.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(log.f64 (exp.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(log.f64 (+.f64 1 (expm1.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cbrt.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 3))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(expm1.f64 (log1p.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(exp.f64 (log.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(exp.f64 (.f64 (log.f64 (cos.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))) 1))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(log1p.f64 (expm1.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(+.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) (fma.f64 (neg.f64 a) a (.f64 a a))))
(fma.f64 (.f64 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))) 1/2) (fma.f64 (neg.f64 a) a (.f64 a a)) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))))))
(fma.f64 (+.f64 0 (.f64 1/2 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90)))) (.f64 a (+.f64 (neg.f64 a) a)) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90)))))
(+.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2) (.f64 (fma.f64 (neg.f64 a) a (.f64 a a)) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(fma.f64 (.f64 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))) 1/2) (fma.f64 (neg.f64 a) a (.f64 a a)) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))))))
(fma.f64 (+.f64 0 (.f64 1/2 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90)))) (.f64 a (+.f64 (neg.f64 a) a)) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90)))))
(+.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) (.f64 b b)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) (.f64 a (neg.f64 a))))
(.f64 (.f64 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))) 1/2) (-.f64 (.f64 b b) (.f64 a a)))
(.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (.f64 1/2 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90)))))
(+.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) (.f64 a (neg.f64 a))) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) (.f64 b b)))
(.f64 (.f64 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))) 1/2) (-.f64 (.f64 b b) (.f64 a a)))
(.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (.f64 1/2 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90)))))
(+.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) (fma.f64 (neg.f64 a) a (.f64 a a))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))
(fma.f64 (.f64 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))) 1/2) (fma.f64 (neg.f64 a) a (.f64 a a)) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))))))
(fma.f64 (+.f64 0 (.f64 1/2 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90)))) (.f64 a (+.f64 (neg.f64 a) a)) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90)))))
(+.f64 (.f64 (.f64 b b) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)) (.f64 (.f64 a (neg.f64 a)) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (.f64 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))) 1/2) (-.f64 (.f64 b b) (.f64 a a)))
(.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (.f64 1/2 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90)))))
(+.f64 (.f64 (.f64 a (neg.f64 a)) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)) (.f64 (.f64 b b) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (.f64 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))) 1/2) (-.f64 (.f64 b b) (.f64 a a)))
(.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (.f64 1/2 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90)))))
(+.f64 (.f64 (fma.f64 (neg.f64 a) a (.f64 a a)) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))
(fma.f64 (.f64 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))) 1/2) (fma.f64 (neg.f64 a) a (.f64 a a)) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))))))
(fma.f64 (+.f64 0 (.f64 1/2 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90)))) (.f64 a (+.f64 (neg.f64 a) a)) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90)))))
(-.f64 (exp.f64 (log1p.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))) 1)
(/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle)))))))
(.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))
(/.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) (-.f64 (pow.f64 b 4) (pow.f64 a 4))) (fma.f64 b b (*.f64 a a)))
(/.f64 (.f64 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))) 1/2) (/.f64 (fma.f64 b b (.f64 a a)) (-.f64 (pow.f64 b 4) (pow.f64 a 4))))
(.f64 (/.f64 (-.f64 (pow.f64 b 4) (pow.f64 a 4)) (fma.f64 b b (.f64 a a))) (+.f64 0 (.f64 1/2 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90)))))
(/.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 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 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))) 1/2) (/.f64 (+.f64 (pow.f64 b 4) (+.f64 (pow.f64 a 4) (pow.f64 (.f64 a b) 2))) (-.f64 (pow.f64 b 6) (pow.f64 a 6))))
(/.f64 (+.f64 0 (.f64 1/2 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90)))) (/.f64 (+.f64 (pow.f64 b 4) (+.f64 (pow.f64 a 4) (pow.f64 (.f64 a b) 2))) (-.f64 (pow.f64 b 6) (pow.f64 a 6))))
(/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)
(/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle)))))))
(.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))
(/.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) (-.f64 (.f64 b b) (*.f64 a a))) 2)
(/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle)))))))
(.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))
(/.f64 (.f64 (-.f64 (pow.f64 b 4) (pow.f64 a 4)) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)) (fma.f64 b b (*.f64 a a)))
(/.f64 (.f64 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))) 1/2) (/.f64 (fma.f64 b b (.f64 a a)) (-.f64 (pow.f64 b 4) (pow.f64 a 4))))
(.f64 (/.f64 (-.f64 (pow.f64 b 4) (pow.f64 a 4)) (fma.f64 b b (.f64 a a))) (+.f64 0 (.f64 1/2 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90)))))
(/.f64 (.f64 (-.f64 (pow.f64 b 6) (pow.f64 a 6)) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)) (+.f64 (pow.f64 b 4) (+.f64 (pow.f64 a 4) (pow.f64 (*.f64 b a) 2))))
(/.f64 (.f64 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))) 1/2) (/.f64 (+.f64 (pow.f64 b 4) (+.f64 (pow.f64 a 4) (pow.f64 (.f64 a b) 2))) (-.f64 (pow.f64 b 6) (pow.f64 a 6))))
(/.f64 (+.f64 0 (.f64 1/2 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90)))) (/.f64 (+.f64 (pow.f64 b 4) (+.f64 (pow.f64 a 4) (pow.f64 (.f64 a b) 2))) (-.f64 (pow.f64 b 6) (pow.f64 a 6))))
(/.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) (-.f64 (pow.f64 b 4) (pow.f64 a 4))) (.f64 2 (fma.f64 b b (*.f64 a a))))
(.f64 (/.f64 (-.f64 (pow.f64 b 4) (pow.f64 a 4)) (fma.f64 b b (.f64 a a))) (/.f64 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))) 2))
(.f64 (/.f64 (-.f64 (pow.f64 b 4) (pow.f64 a 4)) (fma.f64 b b (.f64 a a))) (/.f64 (+.f64 0 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90))) 2))
(/.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) (-.f64 (pow.f64 b 6) (pow.f64 a 6))) (.f64 2 (+.f64 (pow.f64 b 4) (+.f64 (pow.f64 a 4) (pow.f64 (*.f64 b a) 2)))))
(.f64 (/.f64 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))) 2) (/.f64 (-.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 0 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90))) (/.f64 (+.f64 (pow.f64 b 4) (+.f64 (pow.f64 a 4) (pow.f64 (*.f64 a b) 2))) (/.f64 (-.f64 (pow.f64 b 6) (pow.f64 a 6)) 2)))
(/.f64 (.f64 (-.f64 (pow.f64 b 4) (pow.f64 a 4)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) (.f64 (fma.f64 b b (*.f64 a a)) 2))
(.f64 (/.f64 (-.f64 (pow.f64 b 4) (pow.f64 a 4)) (fma.f64 b b (.f64 a a))) (/.f64 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))) 2))
(.f64 (/.f64 (-.f64 (pow.f64 b 4) (pow.f64 a 4)) (fma.f64 b b (.f64 a a))) (/.f64 (+.f64 0 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90))) 2))
(/.f64 (.f64 (-.f64 (pow.f64 b 6) (pow.f64 a 6)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) (.f64 (+.f64 (pow.f64 b 4) (+.f64 (pow.f64 a 4) (pow.f64 (*.f64 b a) 2))) 2))
(.f64 (/.f64 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))) 2) (/.f64 (-.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 0 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90))) (/.f64 (+.f64 (pow.f64 b 4) (+.f64 (pow.f64 a 4) (pow.f64 (*.f64 a b) 2))) (/.f64 (-.f64 (pow.f64 b 6) (pow.f64 a 6)) 2)))
(pow.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2) 1)
(/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle)))))))
(.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))
(pow.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 2)
(pow.f64 (sqrt.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle)))))))) 2)
(pow.f64 (sqrt.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))) 2)
(pow.f64 (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 3)
(/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle)))))))
(.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))
(pow.f64 (pow.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2) 3) 1/3)
(/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle)))))))
(.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))
(sqrt.f64 (pow.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2) 2))
(sqrt.f64 (pow.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))))) 2))
(sqrt.f64 (pow.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90)))) 2))
(log.f64 (pow.f64 (sqrt.f64 (exp.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))))) (-.f64 (.f64 b b) (.f64 a a))))
(log.f64 (pow.f64 (sqrt.f64 (.f64 1 (exp.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))))) (-.f64 (.f64 b b) (*.f64 a a))))
(log.f64 (pow.f64 (sqrt.f64 (.f64 1 (exp.f64 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90))))) (-.f64 (.f64 b b) (*.f64 a a))))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))))
(/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle)))))))
(.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))
(cbrt.f64 (pow.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2) 3))
(/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle)))))))
(.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))
(cbrt.f64 (.f64 (pow.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) 3) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 3)))
(cbrt.f64 (.f64 (pow.f64 (.f64 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))) 1/2) 3) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 3)))
(cbrt.f64 (.f64 (pow.f64 (+.f64 0 (.f64 1/2 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90)))) 3) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 3)))
(cbrt.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 3) (pow.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2) 3)))
(cbrt.f64 (.f64 (pow.f64 (.f64 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle))))) 1/2) 3) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 3)))
(cbrt.f64 (.f64 (pow.f64 (+.f64 0 (.f64 1/2 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90)))) 3) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 3)))
(expm1.f64 (log1p.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)))
(/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle)))))))
(.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))
(exp.f64 (log.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)))
(/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle)))))))
(.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))
(exp.f64 (.f64 (log.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 1))
(/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle)))))))
(.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))
(log1p.f64 (expm1.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)))
(/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 1/180 (.f64 (PI.f64) (+.f64 angle angle)))))))
(.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (+.f64 0 (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90))))

localize67.0ms (0%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	80.9%	(.f64 (/.f64 y-scale angle) (/.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))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))
✓	76.7%	(/.f64 (.f64 b b) (.f64 x-scale x-scale))
✓	76.6%	(/.f64 (.f64 a a) (.f64 y-scale y-scale))
✓	45.9%	(/.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))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))

Compiler

Compiled 321 to 68 computations (78.8% saved)

series33.0ms (0%)

Counts

4 → 156

Calls

39 calls:

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

rewrite137.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

590×	`add-sqr-sqrt`
584×	`pow1`
584×	`*-un-lft-identity`
546×	`add-exp-log`
546×	`add-log-exp`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	24	224
1	559	224

Stop Event

1×	node limit

Counts

4 → 189

Calls

Call 1

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

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

simplify259.0ms (0.2%)

Algorithm

1×	egg-herbie

Rules

1902×	`associate-/l*`
1422×	`associate-/r*`
1128×	`*-commutative`
1116×	`associate-*r/`
1030×	`associate-r`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	705	30231
1	2305	29921

Stop Event

1×	node limit

Counts

345 → 387

Calls

Call 1

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

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

localize193.0ms (0.1%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	71.2%	(.f64 (.f64 y-scale x-scale) (.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))))))))
✓	59.4%	(cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
✓	58.7%	(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
✓	58.0%	(/.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))))))

Compiler

Compiled 542 to 293 computations (45.9% saved)

series53.0ms (0%)

Counts

4 → 132

Calls

33 calls:

Time	Variable		Point	Expression
6.0ms	y-scale	@	inf	(.f64 (.f64 y-scale x-scale) (.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))))))))
5.0ms	a	@	inf	(.f64 (.f64 y-scale x-scale) (.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))))))))
4.0ms	angle	@	0	(.f64 (.f64 y-scale x-scale) (.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))))))))
4.0ms	y-scale	@	0	(.f64 (.f64 y-scale x-scale) (.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))))))))
3.0ms	angle	@	0	(/.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))))))

rewrite84.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

828×	`add-sqr-sqrt`
814×	`*-un-lft-identity`
810×	`pow1`
766×	`add-exp-log`
766×	`add-log-exp`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	35	418
1	800	412

Stop Event

1×	node limit

Counts

4 → 47

Calls

Call 1

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

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

simplify253.0ms (0.2%)

Algorithm

1×	egg-herbie

Rules

1332×	`associate-r`
1072×	`associate-/r*`
1002×	`*-commutative`
990×	`associate-/l*`
884×	`associate-l`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	577	36513
1	1995	36061

Stop Event

1×	node limit

Counts

179 → 213

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

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 (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 2 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.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 (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))))))))
(fma.f64 2 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.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 (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 -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 2 (.f64 (.f64 b b) (-.f64 (/.f64 (neg.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 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 x-scale (.f64 a a))))))) (/.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 2 (/.f64 (.f64 (pow.f64 b 4) (-.f64 (.f64 -1 (/.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 (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 a 2))) (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.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 (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)))))))))
(fma.f64 2 (/.f64 (pow.f64 b 4) (/.f64 (.f64 a a) (-.f64 (neg.f64 (/.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 (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))))))) (fma.f64 2 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.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 (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 -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 2 (.f64 (/.f64 (pow.f64 b 4) (.f64 a a)) (-.f64 (/.f64 (neg.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 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 x-scale (.f64 a a))))))) (fma.f64 2 (.f64 (.f64 b b) (-.f64 (/.f64 (neg.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 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 x-scale (.f64 a a))))))) (/.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 2 (/.f64 (.f64 (pow.f64 b 4) (-.f64 (.f64 -1 (/.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 (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 a 2))) (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 6) (-.f64 (.f64 -1 (/.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 (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 a 4))) (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.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 (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))))))))))
(fma.f64 2 (/.f64 (pow.f64 b 4) (/.f64 (.f64 a a) (-.f64 (neg.f64 (/.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 (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))))))) (fma.f64 2 (/.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 x-scale) (.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) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))))) (fma.f64 2 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.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 (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 -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 2 (.f64 (/.f64 (pow.f64 b 4) (.f64 a a)) (-.f64 (/.f64 (neg.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 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 x-scale (.f64 a a))))))) (fma.f64 2 (.f64 (/.f64 (pow.f64 b 6) (pow.f64 a 4)) (-.f64 (/.f64 (neg.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 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 x-scale (.f64 a a))))))) (fma.f64 2 (.f64 (.f64 b b) (-.f64 (/.f64 (neg.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 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 x-scale (.f64 a a))))))) (/.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 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 2 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(+.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 (/.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 -1 (/.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 b 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 x-scale x-scale))) (/.f64 (-.f64 (.f64 (.f64 (/.f64 a x-scale) (/.f64 a 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))))) (.f64 b b))))
(.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 x-scale))) (/.f64 (-.f64 (/.f64 (.f64 (.f64 (/.f64 a x-scale) (/.f64 a x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 a (neg.f64 a)) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (*.f64 b b))))
(+.f64 (.f64 2 (/.f64 (.f64 (-.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)))))) (.f64 -1 (/.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 (/.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 -1 (/.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 b 2)))))
(fma.f64 2 (/.f64 (-.f64 (.f64 (.f64 (/.f64 a x-scale) (/.f64 a 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))))) (/.f64 (pow.f64 b 4) (.f64 a a))) (.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 (.f64 (.f64 (/.f64 a x-scale) (/.f64 a 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))))) (*.f64 b b)))))
(.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 (.f64 (.f64 (/.f64 a x-scale) (/.f64 a x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 a (neg.f64 a)) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 b b))) (/.f64 (-.f64 (/.f64 (.f64 (.f64 (/.f64 a x-scale) (/.f64 a x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 a (neg.f64 a)) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (pow.f64 b 4) (*.f64 a a)))))
(+.f64 (.f64 2 (/.f64 (.f64 (-.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)))))) (.f64 -1 (/.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 (.f64 (-.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)))))) (.f64 -1 (/.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 (.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 (/.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 -1 (/.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 b 2))))))
(fma.f64 2 (/.f64 (-.f64 (.f64 (.f64 (/.f64 a x-scale) (/.f64 a 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))))) (/.f64 (pow.f64 b 4) (.f64 a a))) (fma.f64 2 (/.f64 (-.f64 (.f64 (.f64 (/.f64 a x-scale) (/.f64 a 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))))) (/.f64 (pow.f64 b 6) (pow.f64 a 4))) (.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 (.f64 (.f64 (/.f64 a x-scale) (/.f64 a 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))))) (*.f64 b b))))))
(fma.f64 2 (/.f64 (-.f64 (/.f64 (.f64 (.f64 (/.f64 a x-scale) (/.f64 a x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 a (neg.f64 a)) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (pow.f64 b 4) (.f64 a a))) (.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 (.f64 (.f64 (/.f64 a x-scale) (/.f64 a x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 a (neg.f64 a)) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 b b))) (.f64 (/.f64 (-.f64 (/.f64 (.f64 (.f64 (/.f64 a x-scale) (/.f64 a x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 a (neg.f64 a)) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale)) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) (pow.f64 b 6)) (pow.f64 a 4)))))
(.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 2 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(+.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 (/.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 -1 (/.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 b 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 x-scale x-scale))) (/.f64 (-.f64 (.f64 (.f64 (/.f64 a x-scale) (/.f64 a 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))))) (.f64 b b))))
(.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 x-scale))) (/.f64 (-.f64 (/.f64 (.f64 (.f64 (/.f64 a x-scale) (/.f64 a x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 a (neg.f64 a)) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (*.f64 b b))))
(+.f64 (.f64 2 (/.f64 (.f64 (-.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)))))) (.f64 -1 (/.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 (/.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 -1 (/.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 b 2)))))
(fma.f64 2 (/.f64 (-.f64 (.f64 (.f64 (/.f64 a x-scale) (/.f64 a 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))))) (/.f64 (pow.f64 b 4) (.f64 a a))) (.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 (.f64 (.f64 (/.f64 a x-scale) (/.f64 a 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))))) (*.f64 b b)))))
(.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 (.f64 (.f64 (/.f64 a x-scale) (/.f64 a x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 a (neg.f64 a)) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 b b))) (/.f64 (-.f64 (/.f64 (.f64 (.f64 (/.f64 a x-scale) (/.f64 a x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 a (neg.f64 a)) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (pow.f64 b 4) (*.f64 a a)))))
(+.f64 (.f64 2 (/.f64 (.f64 (-.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)))))) (.f64 -1 (/.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 (.f64 (-.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)))))) (.f64 -1 (/.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 (.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 (/.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 -1 (/.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 b 2))))))
(fma.f64 2 (/.f64 (-.f64 (.f64 (.f64 (/.f64 a x-scale) (/.f64 a 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))))) (/.f64 (pow.f64 b 4) (.f64 a a))) (fma.f64 2 (/.f64 (-.f64 (.f64 (.f64 (/.f64 a x-scale) (/.f64 a 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))))) (/.f64 (pow.f64 b 6) (pow.f64 a 4))) (.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 (.f64 (.f64 (/.f64 a x-scale) (/.f64 a 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))))) (*.f64 b b))))))
(fma.f64 2 (/.f64 (-.f64 (/.f64 (.f64 (.f64 (/.f64 a x-scale) (/.f64 a x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 a (neg.f64 a)) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (pow.f64 b 4) (.f64 a a))) (.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 (.f64 (.f64 (/.f64 a x-scale) (/.f64 a x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 a (neg.f64 a)) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 b b))) (.f64 (/.f64 (-.f64 (/.f64 (.f64 (.f64 (/.f64 a x-scale) (/.f64 a x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 a (neg.f64 a)) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale)) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) (pow.f64 b 6)) (pow.f64 a 4)))))
(.f64 2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 2 (/.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 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 2 (fma.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 x-scale (.f64 (.f64 (.f64 x-scale (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))))))
(.f64 2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 2 (/.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 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 2 (fma.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 x-scale (.f64 (.f64 (.f64 x-scale (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))))))
(.f64 2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 2 (/.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 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 2 (fma.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 x-scale (.f64 (.f64 (.f64 x-scale (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))))))
(.f64 2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 2 (/.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 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 2 (fma.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 x-scale (.f64 (.f64 (.f64 x-scale (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))))))
(.f64 2 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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 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 2 (/.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 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 2 (fma.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 x-scale (.f64 (.f64 (.f64 x-scale (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))))))
(.f64 2 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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 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 2 (/.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 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 2 (fma.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 x-scale (.f64 (.f64 (.f64 x-scale (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))))))
(.f64 2 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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 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 2 (/.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 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 2 (fma.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 x-scale (.f64 (.f64 (.f64 x-scale (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))))))
(.f64 2 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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 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 2 (/.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 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 2 (fma.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 x-scale (.f64 (.f64 (.f64 x-scale (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))))))
(.f64 2 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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 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 2 (/.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 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 2 (fma.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 x-scale (.f64 (.f64 (.f64 x-scale (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))))))
(.f64 2 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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 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 2 (/.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 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 2 (fma.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 x-scale (.f64 (.f64 (.f64 x-scale (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))))))
(.f64 2 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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 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 2 (/.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 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 2 (fma.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 x-scale (.f64 (.f64 (.f64 x-scale (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))))))
(.f64 2 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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 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 2 (/.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 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 2 (fma.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 x-scale (.f64 (.f64 (.f64 x-scale (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))))))
(.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 360 (/.f64 (.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 angle (.f64 x-scale x-scale))) (*.f64 b b)))
(+.f64 (.f64 2 (.f64 angle (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 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 (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 2 (.f64 angle (+.f64 (.f64 180 (/.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -32400 (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 (.f64 x-scale x-scale) (.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 2 (.f64 angle (fma.f64 180 (/.f64 (fma.f64 -1/32400 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (pow.f64 (PI.f64) 2)) (/.f64 1/32400 (/.f64 (.f64 x-scale x-scale) (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (/.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (/.f64 x-scale (/.f64 b (/.f64 x-scale b)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))) -32400))) (/.f64 360 (/.f64 (.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 angle (.f64 x-scale x-scale))) (*.f64 b b))))
(+.f64 (.f64 2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (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 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))) (.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 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 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 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))))) (PI.f64))))))) (+.f64 (.f64 2 (.f64 angle (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 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 (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 2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-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 b b) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))) (.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (/.f64 (PI.f64) (+.f64 (.f64 180 (/.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -32400 (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))))))))))) (fma.f64 2 (.f64 angle (+.f64 (.f64 180 (/.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -32400 (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 (.f64 x-scale x-scale) (.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 2 (.f64 (pow.f64 angle 3) (-.f64 (/.f64 180 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 -1/3149280000 (.f64 (.f64 (/.f64 a x-scale) (/.f64 a x-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (.f64 b b))))) (fma.f64 32400 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 5) 1/1417176000000) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))) (.f64 180 (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (PI.f64)) (fma.f64 180 (/.f64 (fma.f64 -1/32400 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (pow.f64 (PI.f64) 2)) (/.f64 1/32400 (/.f64 (.f64 x-scale x-scale) (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (/.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (/.f64 x-scale (/.f64 b (/.f64 x-scale b)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))) -32400))))))) (fma.f64 2 (.f64 angle (fma.f64 180 (/.f64 (fma.f64 -1/32400 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (pow.f64 (PI.f64) 2)) (/.f64 1/32400 (/.f64 (.f64 x-scale x-scale) (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (/.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (/.f64 x-scale (/.f64 b (/.f64 x-scale b)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))) -32400))) (/.f64 360 (/.f64 (.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 angle (.f64 x-scale x-scale))) (*.f64 b b)))))
(+.f64 (.f64 2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (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 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))) (.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 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 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 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))))) (PI.f64))))))) (+.f64 (.f64 2 (.f64 angle (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 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 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))))) (+.f64 (.f64 2 (.f64 (-.f64 (.f64 180 (/.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)))) (+.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 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (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 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))) (.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 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 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 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))))) (PI.f64)))))) (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 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))) (.f64 180 (/.f64 (.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 (.f64 180 (/.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 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 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))))) (PI.f64)))))) (pow.f64 angle 5))) (.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 2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-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 b b) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))) (.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (/.f64 (PI.f64) (+.f64 (.f64 180 (/.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -32400 (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))))))))))) (fma.f64 2 (.f64 angle (+.f64 (.f64 180 (/.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -32400 (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))))))) (fma.f64 2 (.f64 (-.f64 (.f64 180 (/.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 (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 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-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 b b) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))) (.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (/.f64 (PI.f64) (+.f64 (.f64 180 (/.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -32400 (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))))))))))))) (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))) (.f64 x-scale x-scale)) (/.f64 (.f64 b b) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))) (.f64 180 (/.f64 (.f64 (+.f64 (.f64 180 (/.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -32400 (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.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))) (PI.f64)))))) (pow.f64 angle 5)) (.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 2 (.f64 (pow.f64 angle 3) (-.f64 (/.f64 180 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 -1/3149280000 (.f64 (.f64 (/.f64 a x-scale) (/.f64 a x-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (.f64 b b))))) (fma.f64 32400 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 5) 1/1417176000000) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))) (.f64 180 (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (PI.f64)) (fma.f64 180 (/.f64 (fma.f64 -1/32400 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (pow.f64 (PI.f64) 2)) (/.f64 1/32400 (/.f64 (.f64 x-scale x-scale) (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (/.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (/.f64 x-scale (/.f64 b (/.f64 x-scale b)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))) -32400))))))) (fma.f64 2 (.f64 angle (fma.f64 180 (/.f64 (fma.f64 -1/32400 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (pow.f64 (PI.f64) 2)) (/.f64 1/32400 (/.f64 (.f64 x-scale x-scale) (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (/.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (/.f64 x-scale (/.f64 b (/.f64 x-scale b)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))) -32400))) (fma.f64 2 (.f64 (-.f64 (.f64 180 (-.f64 (/.f64 (+.f64 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (.f64 (.f64 (/.f64 a x-scale) (/.f64 a x-scale)) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (PI.f64)) (-.f64 (/.f64 180 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 -1/3149280000 (.f64 (.f64 (/.f64 a x-scale) (/.f64 a x-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (.f64 b b))))) (fma.f64 32400 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 5) 1/1417176000000) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))) (.f64 180 (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (PI.f64)) (fma.f64 180 (/.f64 (fma.f64 -1/32400 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (pow.f64 (PI.f64) 2)) (/.f64 1/32400 (/.f64 (.f64 x-scale x-scale) (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (/.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (/.f64 x-scale (/.f64 b (/.f64 x-scale b)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))) -32400))))))))) (fma.f64 32400 (.f64 (/.f64 (fma.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7) (.f64 (pow.f64 (PI.f64) 7) -19/10285296537600000000)) (.f64 x-scale x-scale)) (/.f64 b (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)) b))) (.f64 180 (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 5) 1/1417176000000) (PI.f64)) (fma.f64 180 (/.f64 (fma.f64 -1/32400 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (pow.f64 (PI.f64) 2)) (/.f64 1/32400 (/.f64 (.f64 x-scale x-scale) (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (/.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (/.f64 x-scale (/.f64 b (/.f64 x-scale b)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))) -32400)))))) (pow.f64 angle 5)) (/.f64 360 (/.f64 (.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 angle (.f64 x-scale x-scale))) (*.f64 b b))))))
(.f64 2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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 (.f64 b b) (*.f64 a a)))))
(.f64 2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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 (.f64 b b) (*.f64 a a)))))
(.f64 2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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 (.f64 b b) (*.f64 a a)))))
(.f64 2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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 (.f64 b b) (*.f64 a a)))))
(.f64 2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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 (.f64 b b) (*.f64 a a)))))
(.f64 2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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 (.f64 b b) (*.f64 a a)))))
(.f64 2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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 (.f64 b b) (*.f64 a a)))))
(.f64 2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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 (.f64 b b) (*.f64 a a)))))
(.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 2 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(+.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 (pow.f64 a 2) (-.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 (/.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))))))))))))
(.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 (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 b b)))) (neg.f64 (/.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 b b)))))))))
(.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 x-scale))) (.f64 a (.f64 a (+.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 b b)))) (/.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 b b)))))))
(+.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 (pow.f64 a 2) (-.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 (/.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))))))))))) (.f64 2 (/.f64 (.f64 (pow.f64 a 4) (-.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 (/.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 b 2)))))
(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 2 (+.f64 (.f64 (.f64 a a) (-.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 b b)))) (neg.f64 (/.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 b b))))))) (/.f64 (.f64 (pow.f64 a 4) (-.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 b b)))) (neg.f64 (/.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 b b))))))) (*.f64 b b)))))
(.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 x-scale))) (+.f64 (.f64 a (.f64 a (+.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 b b)))) (/.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 b b))))) (.f64 (/.f64 (pow.f64 a 4) (.f64 b b)) (+.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 b b)))) (/.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 b b)))))))
(+.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 (pow.f64 a 2) (-.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 (/.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))))))))))) (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 4) (-.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 (/.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 b 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 6) (-.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 (/.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 b 4))))))
(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 (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 b b)))) (neg.f64 (/.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 b b))))))) (.f64 2 (+.f64 (/.f64 (.f64 (pow.f64 a 4) (-.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 b b)))) (neg.f64 (/.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 b b))))))) (.f64 b b)) (/.f64 (.f64 (-.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 b b)))) (neg.f64 (/.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 b b)))))) (pow.f64 a 6)) (pow.f64 b 4))))))
(.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 a (.f64 a (+.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 b b)))) (/.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 b b)))))) (+.f64 (.f64 (/.f64 (pow.f64 a 4) (.f64 b b)) (+.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 b b)))) (/.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 b b)))) (.f64 (/.f64 (pow.f64 a 6) (pow.f64 b 4)) (+.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 b b)))) (/.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 b b)))))))
(.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 (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 2 (/.f64 (-.f64 (.f64 -1 (/.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 (.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 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 2 (/.f64 (-.f64 (neg.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)))) (.f64 (.f64 (/.f64 b x-scale) (/.f64 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 -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 2 (/.f64 (-.f64 (.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale))) (/.f64 b (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 b b)))) (.f64 a a)) (/.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 2 (/.f64 (-.f64 (.f64 -1 (/.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 (.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 2))) (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.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 (.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 -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 2 (/.f64 (-.f64 (neg.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)))) (.f64 (.f64 (/.f64 b x-scale) (/.f64 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)) (fma.f64 2 (/.f64 (.f64 b b) (/.f64 (pow.f64 a 4) (-.f64 (neg.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)))) (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (/.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 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 2 (/.f64 (-.f64 (.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale))) (/.f64 b (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 b b)))) (.f64 a a)) (fma.f64 2 (.f64 (/.f64 (.f64 b b) (pow.f64 a 4)) (-.f64 (.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale))) (/.f64 b (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 b b))))) (/.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 2 (/.f64 (-.f64 (.f64 -1 (/.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 (.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 2))) (+.f64 (.f64 2 (/.f64 (.f64 (-.f64 (.f64 -1 (/.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 (.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 (pow.f64 b 2) (-.f64 (.f64 -1 (/.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 (.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 -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 2 (/.f64 (-.f64 (neg.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)))) (.f64 (.f64 (/.f64 b x-scale) (/.f64 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)) (fma.f64 2 (/.f64 (-.f64 (neg.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)))) (.f64 (.f64 (/.f64 b x-scale) (/.f64 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))) (fma.f64 2 (/.f64 (.f64 b b) (/.f64 (pow.f64 a 4) (-.f64 (neg.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)))) (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (/.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 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 2 (/.f64 (-.f64 (.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale))) (/.f64 b (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 b b)))) (.f64 a a)) (fma.f64 2 (.f64 (/.f64 (-.f64 (.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale))) (/.f64 b (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 b b)))) (pow.f64 a 6)) (pow.f64 b 4)) (fma.f64 2 (.f64 (/.f64 (.f64 b b) (pow.f64 a 4)) (-.f64 (.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale))) (/.f64 b (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 b b))))) (/.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 -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 (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 2 (/.f64 (-.f64 (.f64 -1 (/.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 (.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 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 2 (/.f64 (-.f64 (neg.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)))) (.f64 (.f64 (/.f64 b x-scale) (/.f64 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 -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 2 (/.f64 (-.f64 (.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale))) (/.f64 b (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 b b)))) (.f64 a a)) (/.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 2 (/.f64 (-.f64 (.f64 -1 (/.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 (.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 2))) (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.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 (.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 -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 2 (/.f64 (-.f64 (neg.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)))) (.f64 (.f64 (/.f64 b x-scale) (/.f64 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)) (fma.f64 2 (/.f64 (.f64 b b) (/.f64 (pow.f64 a 4) (-.f64 (neg.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)))) (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (/.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 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 2 (/.f64 (-.f64 (.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale))) (/.f64 b (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 b b)))) (.f64 a a)) (fma.f64 2 (.f64 (/.f64 (.f64 b b) (pow.f64 a 4)) (-.f64 (.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale))) (/.f64 b (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 b b))))) (/.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 2 (/.f64 (-.f64 (.f64 -1 (/.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 (.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 2))) (+.f64 (.f64 2 (/.f64 (.f64 (-.f64 (.f64 -1 (/.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 (.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 (pow.f64 b 2) (-.f64 (.f64 -1 (/.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 (.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 -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 2 (/.f64 (-.f64 (neg.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)))) (.f64 (.f64 (/.f64 b x-scale) (/.f64 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)) (fma.f64 2 (/.f64 (-.f64 (neg.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)))) (.f64 (.f64 (/.f64 b x-scale) (/.f64 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))) (fma.f64 2 (/.f64 (.f64 b b) (/.f64 (pow.f64 a 4) (-.f64 (neg.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)))) (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (/.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 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 2 (/.f64 (-.f64 (.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale))) (/.f64 b (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 b b)))) (.f64 a a)) (fma.f64 2 (.f64 (/.f64 (-.f64 (.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale))) (/.f64 b (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 b b)))) (pow.f64 a 6)) (pow.f64 b 4)) (fma.f64 2 (.f64 (/.f64 (.f64 b b) (pow.f64 a 4)) (-.f64 (.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale))) (/.f64 b (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 b b))))) (/.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 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 1/22674816000000 (.f64 (pow.f64 (PI.f64) 5) (pow.f64 angle 5)))))
(fma.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)) (fma.f64 1/180 (.f64 angle (PI.f64)) (.f64 (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 -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 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 (/.f64 (.f64 x-scale (.f64 y-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 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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))) y-scale))))
(.f64 (neg.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a))) y-scale)))
(.f64 -1 (/.f64 (.f64 x-scale (.f64 y-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 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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))) y-scale))))
(.f64 (neg.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a))) y-scale)))
(.f64 -1 (/.f64 (.f64 x-scale (.f64 y-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 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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))) y-scale))))
(.f64 (neg.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a))) y-scale)))
(.f64 -1 (/.f64 (.f64 x-scale (.f64 y-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 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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))) y-scale))))
(.f64 (neg.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a))) y-scale)))
(.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.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))))))))
(neg.f64 (/.f64 x-scale (/.f64 (.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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))) y-scale))))
(.f64 (neg.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a))) y-scale)))
(.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.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))))))))
(neg.f64 (/.f64 x-scale (/.f64 (.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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))) y-scale))))
(.f64 (neg.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a))) y-scale)))
(.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.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))))))))
(neg.f64 (/.f64 x-scale (/.f64 (.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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))) y-scale))))
(.f64 (neg.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a))) y-scale)))
(.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.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))))))))
(neg.f64 (/.f64 x-scale (/.f64 (.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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))) y-scale))))
(.f64 (neg.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a))) y-scale)))
(.f64 -1 (/.f64 (.f64 x-scale (.f64 y-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 (cos.f64 (.f64 1/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 x-scale (/.f64 (.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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))) y-scale))))
(.f64 (neg.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a))) y-scale)))
(.f64 -1 (/.f64 (.f64 x-scale (.f64 y-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 (cos.f64 (.f64 1/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 x-scale (/.f64 (.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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))) y-scale))))
(.f64 (neg.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a))) y-scale)))
(.f64 -1 (/.f64 (.f64 x-scale (.f64 y-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 (cos.f64 (.f64 1/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 x-scale (/.f64 (.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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))) y-scale))))
(.f64 (neg.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a))) y-scale)))
(.f64 -1 (/.f64 (.f64 x-scale (.f64 y-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 (cos.f64 (.f64 1/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 x-scale (/.f64 (.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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))) y-scale))))
(.f64 (neg.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a))) y-scale)))
(.f64 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (/.f64 y-scale x-scale) (/.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 (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 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (fma.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 (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 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (/.f64 y-scale x-scale) (/.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 (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 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (fma.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 (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 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (/.f64 y-scale x-scale) (/.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 (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 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (fma.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 (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 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (/.f64 y-scale x-scale) (/.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 (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 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (fma.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 (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 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (/.f64 y-scale x-scale) (/.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 (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 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (fma.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 (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 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (/.f64 y-scale x-scale) (/.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 (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 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (fma.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 (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 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (/.f64 y-scale x-scale) (/.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 (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 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (fma.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 (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 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (/.f64 y-scale x-scale) (/.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 (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 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (fma.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 (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 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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 (/.f64 y-scale x-scale) (/.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 (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 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (fma.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 (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 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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 (/.f64 y-scale x-scale) (/.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 (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 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (fma.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 (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 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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 (/.f64 y-scale x-scale) (/.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 (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 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (fma.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 (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 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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 (/.f64 y-scale x-scale) (/.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 (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 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (fma.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 (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 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 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(+.f64 (.f64 -1 (.f64 (-.f64 (.f64 -1 (/.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 (.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 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 (.f64 x-scale (.f64 a a)) (cos.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)))))))
(fma.f64 -1 (.f64 b (.f64 b (neg.f64 (+.f64 (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (.f64 x-scale (.f64 a a))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 y-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (.f64 (/.f64 y-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(+.f64 (.f64 -1 (.f64 (-.f64 (.f64 -1 (/.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 (.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 (/.f64 (.f64 (-.f64 (.f64 -1 (/.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 (.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 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 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 (.f64 x-scale (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (fma.f64 -1 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 (.f64 x-scale (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 a a) (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 (.f64 b (.f64 b (neg.f64 (+.f64 (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (.f64 x-scale (.f64 a a))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 y-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (fma.f64 -1 (.f64 (/.f64 (neg.f64 (+.f64 (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (.f64 x-scale (.f64 a a))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 y-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 a a)) (pow.f64 b 4)) (.f64 (/.f64 y-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(+.f64 (.f64 -1 (.f64 (-.f64 (.f64 -1 (/.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 (.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 (/.f64 (.f64 (-.f64 (.f64 -1 (/.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 (.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 (/.f64 (.f64 (-.f64 (.f64 -1 (/.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 (.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 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 (.f64 x-scale (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (fma.f64 -1 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 (.f64 x-scale (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 a a) (pow.f64 b 4))) (fma.f64 -1 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 (.f64 x-scale (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.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)))))))))
(+.f64 (fma.f64 -1 (.f64 (/.f64 (neg.f64 (+.f64 (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (.f64 x-scale (.f64 a a))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 y-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (pow.f64 a 4)) (pow.f64 b 6)) (.f64 (/.f64 y-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (+.f64 (.f64 b (.f64 b (neg.f64 (+.f64 (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (.f64 x-scale (.f64 a a))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 y-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (.f64 (/.f64 (neg.f64 (+.f64 (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (.f64 x-scale (.f64 a a))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 y-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 a a)) (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)))))))
(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 (neg.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 -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 (/.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 -1 (/.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))))
(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)))))) (neg.f64 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.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 (/.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 (-.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 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 b b))))
(+.f64 (.f64 -1 (/.f64 (.f64 (-.f64 (/.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 -1 (/.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 a 2)) (pow.f64 b 4))) (+.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 (/.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 -1 (/.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)))))
(fma.f64 -1 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.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 (pow.f64 b 4) (.f64 a a))) (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)))))) (neg.f64 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.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)))))
(.f64 -1 (+.f64 (+.f64 (/.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 (-.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 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 b b))) (.f64 (/.f64 (-.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 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (pow.f64 b 4)) (.f64 a a))))
(+.f64 (.f64 -1 (/.f64 (.f64 (-.f64 (/.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 -1 (/.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 a 2)) (pow.f64 b 4))) (+.f64 (.f64 -1 (/.f64 (.f64 (-.f64 (/.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 -1 (/.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 a 4)) (pow.f64 b 6))) (+.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 (/.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 -1 (/.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))))))
(fma.f64 -1 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.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 (pow.f64 b 4) (.f64 a a))) (fma.f64 -1 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.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 (pow.f64 b 6) (pow.f64 a 4))) (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)))))) (neg.f64 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.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))))))
(+.f64 (neg.f64 (+.f64 (/.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 (-.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 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 b b)))) (neg.f64 (+.f64 (.f64 (/.f64 (-.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 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (pow.f64 b 4)) (.f64 a a)) (.f64 (/.f64 (-.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 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) (pow.f64 b 6)) (pow.f64 a 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)))))))
(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 (neg.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 -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 (/.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 -1 (/.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))))
(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)))))) (neg.f64 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.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 (/.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 (-.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 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 b b))))
(+.f64 (.f64 -1 (/.f64 (.f64 (-.f64 (/.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 -1 (/.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 a 2)) (pow.f64 b 4))) (+.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 (/.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 -1 (/.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)))))
(fma.f64 -1 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.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 (pow.f64 b 4) (.f64 a a))) (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)))))) (neg.f64 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.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)))))
(.f64 -1 (+.f64 (+.f64 (/.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 (-.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 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 b b))) (.f64 (/.f64 (-.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 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (pow.f64 b 4)) (.f64 a a))))
(+.f64 (.f64 -1 (/.f64 (.f64 (-.f64 (/.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 -1 (/.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 a 2)) (pow.f64 b 4))) (+.f64 (.f64 -1 (/.f64 (.f64 (-.f64 (/.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 -1 (/.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 a 4)) (pow.f64 b 6))) (+.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 (/.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 -1 (/.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))))))
(fma.f64 -1 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.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 (pow.f64 b 4) (.f64 a a))) (fma.f64 -1 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.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 (pow.f64 b 6) (pow.f64 a 4))) (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)))))) (neg.f64 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.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))))))
(+.f64 (neg.f64 (+.f64 (/.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 (-.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 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 b b)))) (neg.f64 (+.f64 (.f64 (/.f64 (-.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 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (pow.f64 b 4)) (.f64 a a)) (.f64 (/.f64 (-.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 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) (pow.f64 b 6)) (pow.f64 a 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 -180 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (/.f64 (.f64 -180 (.f64 (.f64 y-scale b) b)) (.f64 angle x-scale)) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))
(+.f64 (.f64 -1 (.f64 angle (-.f64 (.f64 180 (/.f64 (.f64 x-scale (.f64 y-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 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 (.f64 angle (+.f64 (.f64 180 (/.f64 (.f64 (.f64 x-scale y-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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -32400 (/.f64 y-scale (/.f64 (.f64 (.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))))))) (.f64 -180 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))
(fma.f64 -1 (.f64 angle (fma.f64 180 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (fma.f64 -1/32400 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (pow.f64 (PI.f64) 2)) (/.f64 1/32400 (/.f64 (.f64 x-scale x-scale) (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))))) (/.f64 (PI.f64) y-scale))) (.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 3) (.f64 -1/8748000 (.f64 b b))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (PI.f64) 2))) -32400))) (/.f64 (/.f64 (.f64 -180 (.f64 (.f64 y-scale b) b)) (.f64 angle x-scale)) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))
(+.f64 (.f64 -1 (.f64 angle (-.f64 (.f64 180 (/.f64 (.f64 x-scale (.f64 y-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 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 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (.f64 x-scale (.f64 y-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 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 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 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 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))))))) (PI.f64))))))) (.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 (.f64 angle (+.f64 (.f64 180 (/.f64 (.f64 (.f64 x-scale y-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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -32400 (/.f64 y-scale (/.f64 (.f64 (.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))))))) (fma.f64 -1 (.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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) y-scale) (PI.f64)))) (fma.f64 32400 (/.f64 (.f64 (.f64 (.f64 b b) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000))) y-scale) (.f64 (.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (PI.f64) 2))) (.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 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))) (PI.f64)))) (.f64 -32400 (/.f64 y-scale (/.f64 (.f64 (.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)))))))))))) (.f64 -180 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))
(+.f64 (/.f64 (/.f64 (.f64 -180 (.f64 (.f64 y-scale b) b)) (.f64 angle x-scale)) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (neg.f64 (+.f64 (.f64 angle (fma.f64 180 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (fma.f64 -1/32400 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (pow.f64 (PI.f64) 2)) (/.f64 1/32400 (/.f64 (.f64 x-scale x-scale) (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))))) (/.f64 (PI.f64) y-scale))) (.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 3) (.f64 -1/8748000 (.f64 b b))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (PI.f64) 2))) -32400))) (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (.f64 (/.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (fma.f64 -1/3149280000 (.f64 (.f64 (/.f64 a x-scale) (/.f64 a x-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (.f64 b b))) y-scale))) (fma.f64 32400 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 (PI.f64) 5) 1/1417176000000)))) (/.f64 (.f64 (.f64 180 (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (fma.f64 180 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (fma.f64 -1/32400 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (pow.f64 (PI.f64) 2)) (/.f64 1/32400 (/.f64 (.f64 x-scale x-scale) (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))))) (/.f64 (PI.f64) y-scale))) (.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 3) (.f64 -1/8748000 (.f64 b b))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (PI.f64) 2))) -32400))) (PI.f64))))))))
(+.f64 (.f64 -1 (.f64 (-.f64 (.f64 180 (/.f64 (.f64 x-scale (.f64 y-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 y-scale (.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 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 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (.f64 x-scale (.f64 y-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 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 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64))) (+.f64 (.f64 32400 (/.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 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (.f64 y-scale (.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 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)))))) (pow.f64 angle 5))) (+.f64 (.f64 -1 (.f64 angle (-.f64 (.f64 180 (/.f64 (.f64 x-scale (.f64 y-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 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 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (.f64 x-scale (.f64 y-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 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 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 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 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))))))) (PI.f64))))))) (.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 (.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)))) y-scale) (PI.f64)))) (fma.f64 180 (/.f64 (-.f64 (.f64 180 (/.f64 y-scale (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-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)))))))) (fma.f64 32400 (/.f64 (.f64 (.f64 (.f64 b b) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000))) y-scale) (.f64 (.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (PI.f64) 2))) (.f64 180 (/.f64 (+.f64 (.f64 180 (/.f64 (.f64 (.f64 x-scale y-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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -32400 (/.f64 y-scale (/.f64 (.f64 (.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.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))) (fma.f64 32400 (/.f64 y-scale (/.f64 (.f64 (.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (PI.f64) 2)) (.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 180 (/.f64 (+.f64 (.f64 180 (.f64 (/.f64 y-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 x-scale (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))) (PI.f64)))) (.f64 -32400 (/.f64 y-scale (/.f64 (.f64 (.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.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 -1 (.f64 angle (+.f64 (.f64 180 (/.f64 (.f64 (.f64 x-scale y-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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -32400 (/.f64 y-scale (/.f64 (.f64 (.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))))))) (fma.f64 -1 (.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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) y-scale) (PI.f64)))) (fma.f64 32400 (/.f64 (.f64 (.f64 (.f64 b b) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000))) y-scale) (.f64 (.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (PI.f64) 2))) (.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 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))) (PI.f64)))) (.f64 -32400 (/.f64 y-scale (/.f64 (.f64 (.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)))))))))))) (.f64 -180 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))))
(fma.f64 -1 (.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (-.f64 (.f64 (/.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (+.f64 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (.f64 (.f64 (/.f64 a x-scale) (/.f64 a x-scale)) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) y-scale)) (/.f64 (-.f64 (.f64 180 (.f64 (/.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (fma.f64 -1/3149280000 (.f64 (.f64 (/.f64 a x-scale) (/.f64 a x-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (.f64 b b))) y-scale))) (fma.f64 32400 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 (PI.f64) 5) 1/1417176000000)))) (/.f64 (.f64 (.f64 180 (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (fma.f64 180 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (fma.f64 -1/32400 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (pow.f64 (PI.f64) 2)) (/.f64 1/32400 (/.f64 (.f64 x-scale x-scale) (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))))) (/.f64 (PI.f64) y-scale))) (.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 3) (.f64 -1/8748000 (.f64 b b))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (PI.f64) 2))) -32400))) (PI.f64)))) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))))) (fma.f64 32400 (.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 (PI.f64) (.f64 (.f64 (pow.f64 (PI.f64) 5) 1/1417176000000) (fma.f64 180 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (fma.f64 -1/32400 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (pow.f64 (PI.f64) 2)) (/.f64 1/32400 (/.f64 (.f64 x-scale x-scale) (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))))) (/.f64 (PI.f64) y-scale))) (.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 3) (.f64 -1/8748000 (.f64 b b))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (PI.f64) 2))) -32400)))))))) (+.f64 (/.f64 (/.f64 (.f64 -180 (.f64 (.f64 y-scale b) b)) (.f64 angle x-scale)) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (neg.f64 (+.f64 (.f64 angle (fma.f64 180 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (fma.f64 -1/32400 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (pow.f64 (PI.f64) 2)) (/.f64 1/32400 (/.f64 (.f64 x-scale x-scale) (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))))) (/.f64 (PI.f64) y-scale))) (.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 3) (.f64 -1/8748000 (.f64 b b))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (PI.f64) 2))) -32400))) (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (.f64 (/.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (fma.f64 -1/3149280000 (.f64 (.f64 (/.f64 a x-scale) (/.f64 a x-scale)) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (.f64 b b))) y-scale))) (fma.f64 32400 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 (PI.f64) 5) 1/1417176000000)))) (/.f64 (.f64 (.f64 180 (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (fma.f64 180 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (fma.f64 -1/32400 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (pow.f64 (PI.f64) 2)) (/.f64 1/32400 (/.f64 (.f64 x-scale x-scale) (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))))) (/.f64 (PI.f64) y-scale))) (.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 3) (.f64 -1/8748000 (.f64 b b))) (-.f64 (.f64 b b) (*.f64 a a))) (pow.f64 (PI.f64) 2))) -32400))) (PI.f64)))))))))
(.f64 -1 (/.f64 (.f64 y-scale (.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 (cos.f64 (.f64 1/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 x-scale (/.f64 (.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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))) y-scale))))
(.f64 (neg.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a))) y-scale)))
(.f64 -1 (/.f64 (.f64 y-scale (.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 (cos.f64 (.f64 1/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 x-scale (/.f64 (.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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))) y-scale))))
(.f64 (neg.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a))) y-scale)))
(.f64 -1 (/.f64 (.f64 y-scale (.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 (cos.f64 (.f64 1/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 x-scale (/.f64 (.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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))) y-scale))))
(.f64 (neg.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a))) y-scale)))
(.f64 -1 (/.f64 (.f64 y-scale (.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 (cos.f64 (.f64 1/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 x-scale (/.f64 (.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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))) y-scale))))
(.f64 (neg.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a))) y-scale)))
(.f64 -1 (/.f64 (.f64 y-scale (.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 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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))) y-scale))))
(.f64 (neg.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a))) y-scale)))
(.f64 -1 (/.f64 (.f64 y-scale (.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 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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))) y-scale))))
(.f64 (neg.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a))) y-scale)))
(.f64 -1 (/.f64 (.f64 y-scale (.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 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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))) y-scale))))
(.f64 (neg.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a))) y-scale)))
(.f64 -1 (/.f64 (.f64 y-scale (.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 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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))) y-scale))))
(.f64 (neg.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a))) y-scale)))
(.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 (neg.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 -1 (.f64 (pow.f64 a 2) (-.f64 (/.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 -1 (/.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 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)))) (neg.f64 (/.f64 y-scale (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b))) (cos.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))))))))
(neg.f64 (+.f64 (/.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 (.f64 a a) (-.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 (neg.f64 y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)) (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)))))))
(+.f64 (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.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 -1 (/.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 (/.f64 (.f64 (pow.f64 a 4) (-.f64 (/.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 -1 (/.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 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)))) (neg.f64 (/.f64 y-scale (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1 (+.f64 (/.f64 (.f64 (pow.f64 a 4) (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)))) (neg.f64 (/.f64 y-scale (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 b b)) (.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 (+.f64 (.f64 (.f64 a a) (-.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 (neg.f64 y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))))) (+.f64 (/.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 (/.f64 (pow.f64 a 4) (.f64 b b)) (-.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 (neg.f64 y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)) (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))))))))
(+.f64 (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.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 -1 (/.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 (/.f64 (.f64 (pow.f64 a 4) (-.f64 (/.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 -1 (/.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 (/.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 (pow.f64 a 6) (-.f64 (/.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 -1 (/.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))))))
(fma.f64 -1 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)))) (neg.f64 (/.f64 y-scale (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (fma.f64 -1 (/.f64 (.f64 (pow.f64 a 4) (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)))) (neg.f64 (/.f64 y-scale (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 b b)) (.f64 -1 (+.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 (pow.f64 a 6) (/.f64 (pow.f64 b 4) (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)))) (neg.f64 (/.f64 y-scale (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))))
(+.f64 (neg.f64 (+.f64 (/.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 (/.f64 (pow.f64 a 6) (pow.f64 b 4)) (-.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 (neg.f64 y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))))))) (neg.f64 (+.f64 (.f64 (.f64 a a) (-.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 (neg.f64 y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))))) (.f64 (/.f64 (pow.f64 a 4) (.f64 b b)) (-.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 (neg.f64 y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 y-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.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 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 (/.f64 (-.f64 (neg.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 b b) y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.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 (/.f64 (neg.f64 (+.f64 (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)) (/.f64 x-scale y-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.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 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.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 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 (/.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.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 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 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 (/.f64 (-.f64 (neg.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 b b) y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.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 (/.f64 (.f64 b b) (/.f64 (pow.f64 a 4) (-.f64 (neg.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 b b) y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.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 (/.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 (/.f64 (neg.f64 (+.f64 (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)) (/.f64 x-scale y-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.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 (.f64 (/.f64 (.f64 b b) (pow.f64 a 4)) (neg.f64 (+.f64 (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)) (/.f64 x-scale y-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.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 (/.f64 y-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.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 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 (/.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.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 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 4))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 b 4) (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.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 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 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 (/.f64 (-.f64 (neg.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 b b) y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.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 (/.f64 (.f64 b b) (/.f64 (pow.f64 a 4) (-.f64 (neg.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 b b) y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.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))))))))) (fma.f64 -1 (/.f64 (pow.f64 b 4) (/.f64 (pow.f64 a 6) (-.f64 (neg.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 b b) y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.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 (/.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 (fma.f64 -1 (.f64 (/.f64 (pow.f64 b 4) (pow.f64 a 6)) (neg.f64 (+.f64 (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)) (/.f64 x-scale y-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.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 (/.f64 y-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (+.f64 (/.f64 (neg.f64 (+.f64 (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)) (/.f64 x-scale y-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.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 (.f64 b b) (pow.f64 a 4)) (neg.f64 (+.f64 (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)) (/.f64 x-scale y-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.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 (.f64 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 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.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 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 (/.f64 (-.f64 (neg.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 b b) y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.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 (/.f64 (neg.f64 (+.f64 (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)) (/.f64 x-scale y-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.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 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.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 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 (/.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.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 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 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 (/.f64 (-.f64 (neg.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 b b) y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.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 (/.f64 (.f64 b b) (/.f64 (pow.f64 a 4) (-.f64 (neg.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 b b) y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.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 (/.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 (/.f64 (neg.f64 (+.f64 (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)) (/.f64 x-scale y-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.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 (.f64 (/.f64 (.f64 b b) (pow.f64 a 4)) (neg.f64 (+.f64 (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)) (/.f64 x-scale y-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.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 (/.f64 y-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.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 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 (/.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.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 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 4))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 b 4) (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.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 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 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 (/.f64 (-.f64 (neg.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 b b) y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.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 (/.f64 (.f64 b b) (/.f64 (pow.f64 a 4) (-.f64 (neg.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 b b) y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.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))))))))) (fma.f64 -1 (/.f64 (pow.f64 b 4) (/.f64 (pow.f64 a 6) (-.f64 (neg.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 b b) y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.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 (/.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 (fma.f64 -1 (.f64 (/.f64 (pow.f64 b 4) (pow.f64 a 6)) (neg.f64 (+.f64 (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)) (/.f64 x-scale y-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.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 (/.f64 y-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (+.f64 (/.f64 (neg.f64 (+.f64 (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)) (/.f64 x-scale y-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.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 (.f64 b b) (pow.f64 a 4)) (neg.f64 (+.f64 (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)) (/.f64 x-scale y-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.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 2 (.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))) (/.f64 1 (.f64 (cos.f64 (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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 (.f64 b b) (*.f64 a a)))))
(.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))) (.f64 2 (/.f64 1 (.f64 (cos.f64 (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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 (.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 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 1 (.f64 (cos.f64 (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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 (.f64 b b) (*.f64 a a)))))
(.f64 (.f64 (/.f64 2 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.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)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))) 1)
(.f64 2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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 (.f64 b b) (*.f64 a a)))))
(.f64 1 (.f64 (/.f64 2 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.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)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))))
(.f64 2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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 (.f64 b b) (*.f64 a a)))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.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 2 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))) (/.f64 1 (.f64 (cos.f64 (.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 2 (fma.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.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 (.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 2 (fma.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.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 (/.f64 1 (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)))) (.f64 (sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))))) (sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale))))))))
(.f64 (sqrt.f64 (.f64 (/.f64 2 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.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)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (.f64 (/.f64 2 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.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)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))))
(.f64 2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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 (.f64 b b) (*.f64 a a)))))
(.f64 (.f64 (cbrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.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 b b) (.f64 x-scale x-scale))) (.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 2 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))) (/.f64 1 (.f64 (cos.f64 (.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 2 (fma.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.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 (fma.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.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 (.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 2 (fma.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.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 (/.f64 1 (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)))) (.f64 (cbrt.f64 (.f64 2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))))) (.f64 (cbrt.f64 (.f64 2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))))) (cbrt.f64 (.f64 2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 (/.f64 a x-scale) (/.f64 a x-scale)))))))))
(.f64 (cbrt.f64 (.f64 (/.f64 2 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.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)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (.f64 (cbrt.f64 (.f64 (/.f64 2 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.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)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (cbrt.f64 (.f64 (/.f64 2 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.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)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))))
(.f64 2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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 (.f64 b b) (*.f64 a a)))))
(.f64 (.f64 (cbrt.f64 (.f64 (/.f64 2 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.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)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (cbrt.f64 (.f64 (/.f64 2 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.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)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (cbrt.f64 (.f64 (/.f64 2 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.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)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))))
(.f64 2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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 (.f64 b b) (*.f64 a a)))))
(.f64 (/.f64 1 (.f64 (cos.f64 (.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 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))
(.f64 2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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 (.f64 b b) (*.f64 a a)))))
(.f64 (/.f64 2 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.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)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(.f64 2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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 (.f64 b b) (*.f64 a a)))))
(.f64 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.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)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (/.f64 2 (-.f64 (.f64 b b) (.f64 a a))))
(.f64 2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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 (.f64 b b) (*.f64 a a)))))
(pow.f64 (.f64 (/.f64 2 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.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)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) 1)
(.f64 2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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 (.f64 b b) (*.f64 a a)))))
(log.f64 (exp.f64 (.f64 (/.f64 2 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.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)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))))
(.f64 2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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 (.f64 b b) (*.f64 a a)))))
(cbrt.f64 (.f64 (.f64 (/.f64 2 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.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)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (.f64 (/.f64 2 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.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)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (/.f64 2 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.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)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))))
(cbrt.f64 (pow.f64 (.f64 (/.f64 2 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (sin.f64 (.f64 (*.f64 angle 1/180) (PI.f64)))))) 3))
(cbrt.f64 (pow.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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 (.f64 b b) (*.f64 a a))))) 3))
(expm1.f64 (log1p.f64 (.f64 (/.f64 2 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.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)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))))
(.f64 2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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 (.f64 b b) (*.f64 a a)))))
(exp.f64 (log.f64 (.f64 (/.f64 2 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.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)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))))
(.f64 2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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 (.f64 b b) (*.f64 a a)))))
(log1p.f64 (expm1.f64 (.f64 (/.f64 2 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.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)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))))
(.f64 2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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 (.f64 b b) (*.f64 a a)))))
(.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 1/180 angle)))
(.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 1/180 angle)))
(.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 1/180 angle)))
(.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 1/180 angle)))
(.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 1/180 angle)))
(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 1/180 angle)))
(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 1/180 angle)))
(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 (.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 angle (.f64 1/180 (PI.f64))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(exp.f64 (log.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(log1p.f64 (expm1.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(.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 1/180 angle)))
(.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 1/180 angle)))
(.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 1/180 angle)))
(.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 1/180 angle)))
(.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 1/180 angle)))
(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 1/180 angle)))
(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 1/180 angle)))
(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 (.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 angle (.f64 1/180 (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 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64))))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(pow.f64 (.f64 y-scale (.f64 x-scale (/.f64 (.f64 -1 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.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))))))) 1)
(.f64 y-scale (.f64 x-scale (/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale))))) (.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 x-scale (.f64 (/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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))))) y-scale))
(log.f64 (exp.f64 (.f64 y-scale (.f64 x-scale (/.f64 (.f64 -1 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.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 y-scale (.f64 x-scale (/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale))))) (.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 x-scale (.f64 (/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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))))) y-scale))
(cbrt.f64 (.f64 (.f64 y-scale (.f64 x-scale (/.f64 (.f64 -1 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.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 y-scale (.f64 (.f64 x-scale (/.f64 (.f64 -1 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.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 y-scale (.f64 x-scale (/.f64 (.f64 -1 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.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)))))))))))
(cbrt.f64 (.f64 (.f64 y-scale (.f64 x-scale (/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale))))) (.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 y-scale (.f64 (.f64 x-scale (/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale))))) (.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 y-scale (.f64 x-scale (/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale))))) (.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 y-scale (.f64 x-scale (.f64 (/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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))))) (.f64 x-scale (.f64 (.f64 (.f64 (/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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))))) y-scale) (/.f64 (.f64 x-scale (neg.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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)))))) y-scale))))))
(expm1.f64 (log1p.f64 (.f64 y-scale (.f64 x-scale (/.f64 (.f64 -1 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.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 y-scale (.f64 x-scale (/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale))))) (.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 x-scale (.f64 (/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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))))) y-scale))
(exp.f64 (log.f64 (.f64 y-scale (.f64 x-scale (/.f64 (.f64 -1 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.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 y-scale (.f64 x-scale (/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale))))) (.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 x-scale (.f64 (/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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))))) y-scale))
(log1p.f64 (expm1.f64 (.f64 y-scale (.f64 x-scale (/.f64 (.f64 -1 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.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 y-scale (.f64 x-scale (/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale))))) (.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 x-scale (.f64 (/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a 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))))) y-scale))

localize435.0ms (0.3%)

Local Accuracy

Found 4 expressions with local accuracy:

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

Compiler

Compiled 1143 to 711 computations (37.8% saved)

series25.0ms (0%)

Counts

2 → 60

Calls

15 calls:

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

rewrite61.0ms (0%)

Algorithm

1×	batch-egg-rewrite

Rules

634×	`add-sqr-sqrt`
622×	`*-un-lft-identity`
616×	`pow1`
586×	`add-exp-log`
586×	`add-log-exp`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	29	194
1	630	194

Stop Event

1×	node limit

Counts

2 → 23

Calls

Call 1

Inputs

(*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))

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

Outputs

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

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

simplify171.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

1062×	`associate-+l+`
844×	`associate-/r/`
826×	`+-commutative`
724×	`times-frac`
658×	`associate-+r+`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	326	14949
1	1033	14251
2	5400	14251

Stop Event

1×	node limit

Counts

83 → 106

Calls

Call 1

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

Outputs
(*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.f64 (.f64 (*.f64 y-scale y-scale) x-scale) x-scale)
(*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.f64 (.f64 (*.f64 y-scale y-scale) x-scale) x-scale)
(*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.f64 (.f64 (*.f64 y-scale y-scale) x-scale) x-scale)
(*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.f64 (.f64 (*.f64 y-scale y-scale) x-scale) x-scale)
(*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.f64 (.f64 (*.f64 y-scale y-scale) x-scale) x-scale)
(*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.f64 (.f64 (*.f64 y-scale y-scale) x-scale) x-scale)
(*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.f64 (.f64 (*.f64 y-scale y-scale) x-scale) x-scale)
(*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.f64 (.f64 (*.f64 y-scale y-scale) x-scale) x-scale)
(*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.f64 (.f64 (*.f64 y-scale y-scale) x-scale) x-scale)
(*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.f64 (.f64 (*.f64 y-scale y-scale) x-scale) x-scale)
(*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.f64 (.f64 (*.f64 y-scale y-scale) x-scale) x-scale)
(*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.f64 (.f64 (*.f64 y-scale y-scale) x-scale) x-scale)
(*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.f64 (.f64 (*.f64 y-scale y-scale) x-scale) x-scale)
(*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.f64 (.f64 (*.f64 y-scale y-scale) x-scale) x-scale)
(*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.f64 (.f64 (*.f64 y-scale y-scale) x-scale) x-scale)
(*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.f64 (.f64 (*.f64 y-scale y-scale) x-scale) x-scale)
(*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.f64 (.f64 (*.f64 y-scale y-scale) x-scale) x-scale)
(*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.f64 (.f64 (*.f64 y-scale y-scale) x-scale) x-scale)
(*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.f64 (.f64 (*.f64 y-scale y-scale) x-scale) x-scale)
(*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.f64 (.f64 (*.f64 y-scale y-scale) x-scale) x-scale)
(*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.f64 (.f64 (*.f64 y-scale y-scale) x-scale) x-scale)
(*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.f64 (.f64 (*.f64 y-scale y-scale) x-scale) x-scale)
(*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.f64 (.f64 (*.f64 y-scale y-scale) x-scale) x-scale)
(*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.f64 (.f64 (*.f64 y-scale y-scale) x-scale) x-scale)
(/.f64 1 (pow.f64 x-scale 2))
(/.f64 1 (*.f64 x-scale x-scale))
(/.f64 (/.f64 1 x-scale) x-scale)
(+.f64 (/.f64 1 (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (.f64 1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 angle 2)))))
(+.f64 (/.f64 1 (.f64 x-scale x-scale)) (.f64 (.f64 1/2 (.f64 x-scale x-scale)) (.f64 (.f64 angle angle) (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))
(fma.f64 1/2 (.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (*.f64 angle angle))) (/.f64 (/.f64 1 x-scale) x-scale))
(+.f64 (/.f64 1 (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (pow.f64 (-.f64 (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (+.f64 (.f64 1/6298560000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4))) (.f64 1/2099520000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)))))) (+.f64 (.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (.f64 1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)))))) (.f64 1/2 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (.f64 1/16200 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 angle 2))))))
(+.f64 (/.f64 1 (.f64 x-scale x-scale)) (.f64 1/2 (+.f64 (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 angle 4)) (-.f64 (fma.f64 4 (.f64 (/.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (.f64 y-scale y-scale)) -1/787320000) (+.f64 (pow.f64 (+.f64 (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)) 1/1574640000))) (fma.f64 -1/1574640000 (/.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (.f64 y-scale y-scale)) (pow.f64 (.f64 (.f64 1/2 (.f64 x-scale x-scale)) (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) 2)))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 angle angle) (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))
(fma.f64 1/2 (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 (pow.f64 angle 4) (+.f64 (fma.f64 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)) 1/1574640000 (pow.f64 (.f64 -1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2)) (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale)) -1/196830000) (fma.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale)) -1/1574640000 (pow.f64 (.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) 1/2)) 2))))) (.f64 angle (.f64 angle (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))))))) (/.f64 (/.f64 1 x-scale) x-scale))
(fma.f64 1/2 (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 angle (.f64 angle (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))))) (.f64 (pow.f64 angle 4) (+.f64 (fma.f64 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)) 1/1574640000 (pow.f64 (.f64 -1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2)) (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale)) -1/196830000) (fma.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale)) -1/1574640000 (pow.f64 (.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) 1/2)) 2))))))) (/.f64 (/.f64 1 x-scale) x-scale))
(+.f64 (/.f64 1 (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (pow.f64 (-.f64 (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (+.f64 (.f64 1/6298560000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4))) (.f64 1/2099520000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)))))) (+.f64 (.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (.f64 1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (.f64 1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 angle 2)))) (.f64 1/2 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 angle 6) (-.f64 (+.f64 (.f64 -1/6122200320000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4))) (+.f64 (.f64 2 (.f64 (-.f64 (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (-.f64 (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2)))) (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2)))))) (+.f64 (.f64 -1/408146688000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4))) (.f64 4 (+.f64 (.f64 1/102036672000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 1/32400 (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (+.f64 (.f64 1/1020366720000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 4) (.f64 (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (.f64 1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (.f64 1/6298560000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4))) (+.f64 (pow.f64 (-.f64 (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (.f64 1/2099520000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)))))) (+.f64 (pow.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (.f64 1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2) (.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (.f64 1/612220032000000 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))))
(+.f64 (/.f64 1 (.f64 x-scale x-scale)) (fma.f64 1/2 (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 angle 4)) (-.f64 (fma.f64 4 (.f64 (/.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (.f64 y-scale y-scale)) -1/787320000) (+.f64 (pow.f64 (+.f64 (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)) 1/1574640000))) (fma.f64 -1/1574640000 (/.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (.f64 y-scale y-scale)) (pow.f64 (.f64 (.f64 1/2 (.f64 x-scale x-scale)) (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) 2)))) (.f64 1/2 (+.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 angle angle) (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 angle 6)) (-.f64 (fma.f64 -1/6122200320000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4)) (fma.f64 2 (.f64 (+.f64 (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) 1/3149280000) (.f64 1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale))))) (fma.f64 -1/408146688000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4)) (.f64 4 (fma.f64 1/102036672000000 (/.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale x-scale)) (.f64 y-scale y-scale)) (fma.f64 1/1224440064000000 (/.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale x-scale)) (.f64 y-scale y-scale)) (fma.f64 1/2040733440000000 (/.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale x-scale)) (.f64 y-scale y-scale)) (.f64 1/32400 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))))))))) (fma.f64 1/1020366720000000 (/.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale x-scale)) (.f64 y-scale y-scale)) (fma.f64 1/2 (.f64 (.f64 (pow.f64 x-scale 4) (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 4 (.f64 (/.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (.f64 y-scale y-scale)) -1/787320000) (fma.f64 1/6298560000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)) (+.f64 (pow.f64 (+.f64 (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)) 1/2099520000)))) (fma.f64 -1/1574640000 (/.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (.f64 y-scale y-scale)) (pow.f64 (.f64 (.f64 1/2 (.f64 x-scale x-scale)) (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) 2)))) (.f64 (/.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale x-scale)) (.f64 y-scale y-scale)) 1/612220032000000)))))))))
(+.f64 (/.f64 (/.f64 1 x-scale) x-scale) (.f64 1/2 (+.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 (pow.f64 angle 4) (+.f64 (fma.f64 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)) 1/1574640000 (pow.f64 (.f64 -1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2)) (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale)) -1/196830000) (fma.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale)) -1/1574640000 (pow.f64 (.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) 1/2)) 2))))) (.f64 angle (.f64 angle (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))))))) (.f64 (pow.f64 angle 6) (.f64 (-.f64 (fma.f64 -1/6122200320000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4)) (fma.f64 2 (.f64 (.f64 -1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (fma.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) 1/3149280000 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000))) (fma.f64 4 (+.f64 (fma.f64 1/32400 (.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000)) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale)) 1/2040733440000000)) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale)) 13/1224440064000000)) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4)) -1/408146688000000)))) (fma.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale)) 1/1020366720000000 (fma.f64 1/2 (.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 (+.f64 (fma.f64 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)) 1/1574640000 (pow.f64 (.f64 -1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2)) (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale)) -1/196830000) (fma.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale)) -1/1574640000 (pow.f64 (.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) 1/2)) 2)))) (pow.f64 x-scale 4))) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale)) 1/612220032000000)))) (.f64 x-scale x-scale))))))
(+.f64 (/.f64 (/.f64 1 x-scale) x-scale) (.f64 1/2 (+.f64 (.f64 (pow.f64 angle 6) (.f64 (-.f64 (fma.f64 -1/6122200320000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4)) (fma.f64 2 (.f64 (.f64 -1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (fma.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) 1/3149280000 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000))) (fma.f64 4 (+.f64 (fma.f64 1/32400 (.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale)) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale)) 1/2040733440000000)) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale)) 13/1224440064000000)) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4)) -1/408146688000000)))) (fma.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale)) 1/1020366720000000 (fma.f64 1/2 (.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 (+.f64 (fma.f64 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)) 1/1574640000 (pow.f64 (.f64 -1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2)) (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale)) -1/196830000) (fma.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale)) -1/1574640000 (pow.f64 (.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) 1/2)) 2)))) (pow.f64 x-scale 4))) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale)) 1/612220032000000)))) (.f64 x-scale x-scale))) (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 angle (.f64 angle (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))))) (.f64 (pow.f64 angle 4) (+.f64 (fma.f64 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)) 1/1574640000 (pow.f64 (.f64 -1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2)) (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale)) -1/196830000) (fma.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale)) -1/1574640000 (pow.f64 (.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 (*.f64 x-scale x-scale) 1/2)) 2))))))))))
(sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))
(sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))
(sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))
(sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))
(sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))
(sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))
(sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))
(sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))
(/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 y-scale y-scale))
(/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))
(+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))
(fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 y-scale y-scale)))
(fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))
(fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (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) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale)))
(+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))
(fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2)) (fma.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 y-scale y-scale))))
(fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2)) (fma.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))))
(fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (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) 2)) (fma.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (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) 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))))
(+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))
(fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2)) (fma.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2)))) (fma.f64 -1/4 (/.f64 (pow.f64 y-scale 4) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 6) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 y-scale y-scale)))))
(fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2)) (fma.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) 2))) (fma.f64 -1/4 (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6)) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale)) (.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) 2))))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale)))))
(fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (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) 2)) (fma.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (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) 2))) 2))) (fma.f64 -1/4 (.f64 (/.f64 (pow.f64 y-scale 4) (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2)) (/.f64 x-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (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) 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale)))))
(/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))
(/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 x-scale x-scale))
(/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 x-scale x-scale))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale)))
(fma.f64 1/2 (.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 x-scale y-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)))
(fma.f64 1/2 (.f64 (.f64 (/.f64 x-scale (.f64 y-scale y-scale)) x-scale) (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 y-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))
(fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2)))) 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) (fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale))))
(fma.f64 1/2 (.f64 (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale))))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (fma.f64 1/2 (.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 x-scale y-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))))
(fma.f64 1/2 (.f64 (.f64 (/.f64 x-scale (pow.f64 y-scale 4)) x-scale) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2)) (.f64 x-scale x-scale))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (fma.f64 1/2 (.f64 (.f64 (/.f64 x-scale (.f64 y-scale y-scale)) x-scale) (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 x-scale x-scale))))
(+.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 x-scale 6) (.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 y-scale 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 y-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(fma.f64 -1/4 (.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 6))) (fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2)))) 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) (fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale)))))
(fma.f64 -1/4 (.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)) (/.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale))))) 2))))) (fma.f64 1/2 (.f64 (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale))))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (fma.f64 1/2 (.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 x-scale y-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)))))
(fma.f64 -1/4 (.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)) (.f64 (/.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6)) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2)) (.f64 x-scale x-scale))) 2)))) (fma.f64 1/2 (.f64 (.f64 (/.f64 x-scale (pow.f64 y-scale 4)) x-scale) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2)) (.f64 x-scale x-scale))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (fma.f64 1/2 (.f64 (.f64 (/.f64 x-scale (.f64 y-scale y-scale)) x-scale) (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 x-scale x-scale)))))
(/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))
(/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 x-scale x-scale))
(/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 x-scale x-scale))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale)))
(fma.f64 1/2 (.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 x-scale y-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)))
(fma.f64 1/2 (.f64 (.f64 (/.f64 x-scale (.f64 y-scale y-scale)) x-scale) (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 y-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))
(fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2)))) 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) (fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale))))
(fma.f64 1/2 (.f64 (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale))))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (fma.f64 1/2 (.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 x-scale y-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))))
(fma.f64 1/2 (.f64 (.f64 (/.f64 x-scale (pow.f64 y-scale 4)) x-scale) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2)) (.f64 x-scale x-scale))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (fma.f64 1/2 (.f64 (.f64 (/.f64 x-scale (.f64 y-scale y-scale)) x-scale) (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 x-scale x-scale))))
(+.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 x-scale 6) (.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 y-scale 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 y-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(fma.f64 -1/4 (.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 6))) (fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2)))) 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) (fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale)))))
(fma.f64 -1/4 (.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)) (/.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale))))) 2))))) (fma.f64 1/2 (.f64 (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale))))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (fma.f64 1/2 (.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 x-scale y-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)))))
(fma.f64 -1/4 (.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)) (.f64 (/.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6)) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2)) (.f64 x-scale x-scale))) 2)))) (fma.f64 1/2 (.f64 (.f64 (/.f64 x-scale (pow.f64 y-scale 4)) x-scale) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2)) (.f64 x-scale x-scale))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (fma.f64 1/2 (.f64 (.f64 (/.f64 x-scale (.f64 y-scale y-scale)) x-scale) (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 x-scale x-scale)))))
(/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))
(/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 x-scale x-scale))
(/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 x-scale x-scale))
(+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 x-scale x-scale)))
(fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 x-scale x-scale)))
(fma.f64 1/2 (.f64 (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))
(fma.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2)))) (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 x-scale x-scale))))
(fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) 2))) (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))))
(fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) 2)) 2))) (fma.f64 1/2 (.f64 (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 -1/4 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (.f64 (pow.f64 x-scale 4) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(fma.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2)))) (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2)) (fma.f64 -1/4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 6) (.f64 (pow.f64 x-scale 4) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 x-scale x-scale)))))
(fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) 2))) (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2)) (fma.f64 -1/4 (.f64 (/.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6)) (.f64 (pow.f64 x-scale 4) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)))))
(fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) 2)) 2))) (fma.f64 1/2 (.f64 (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) 2) (fma.f64 -1/4 (.f64 (/.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6)) (.f64 (pow.f64 x-scale 4) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) 2)) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 x-scale x-scale)))))
(/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 y-scale y-scale))
(/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))
(fma.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 y-scale y-scale)))
(fma.f64 1/2 (/.f64 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) 2)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale)))
(fma.f64 1/2 (/.f64 (.f64 (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (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 y-scale y-scale))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 x-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))
(fma.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) (fma.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 y-scale y-scale))))
(fma.f64 1/2 (/.f64 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) 2)) (.f64 x-scale x-scale)) (fma.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) 2))) 2)) (pow.f64 x-scale 4))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))))
(fma.f64 1/2 (/.f64 (.f64 (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (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 y-scale y-scale))) 2) (.f64 x-scale x-scale)) (fma.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (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 y-scale y-scale))) 2)) 2)) (pow.f64 x-scale 4))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (.f64 (pow.f64 x-scale 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 x-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))
(fma.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) (fma.f64 -1/4 (/.f64 (.f64 (.f64 (pow.f64 y-scale 6) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2)) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2)))) 2))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 6) (pow.f64 x-scale 6))) (fma.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 y-scale y-scale)))))
(fma.f64 1/2 (/.f64 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) 2)) (.f64 x-scale x-scale)) (fma.f64 -1/4 (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 6)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) 2))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))) (fma.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) 2))) 2)) (pow.f64 x-scale 4))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))))
(fma.f64 1/2 (/.f64 (.f64 (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (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 y-scale y-scale))) 2) (.f64 x-scale x-scale)) (fma.f64 -1/4 (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 6)) (.f64 (/.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6)) (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (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 y-scale y-scale))) 2)) 2)))) (fma.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (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 y-scale y-scale))) 2)) 2)) (pow.f64 x-scale 4))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))))
(/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 y-scale y-scale))
(/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))
(fma.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 y-scale y-scale)))
(fma.f64 1/2 (/.f64 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) 2)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale)))
(fma.f64 1/2 (/.f64 (.f64 (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (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 y-scale y-scale))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 x-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))
(fma.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) (fma.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 y-scale y-scale))))
(fma.f64 1/2 (/.f64 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) 2)) (.f64 x-scale x-scale)) (fma.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) 2))) 2)) (pow.f64 x-scale 4))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))))
(fma.f64 1/2 (/.f64 (.f64 (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (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 y-scale y-scale))) 2) (.f64 x-scale x-scale)) (fma.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (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 y-scale y-scale))) 2)) 2)) (pow.f64 x-scale 4))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (.f64 (pow.f64 x-scale 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 x-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))
(fma.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) (fma.f64 -1/4 (/.f64 (.f64 (.f64 (pow.f64 y-scale 6) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2)) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2)))) 2))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 6) (pow.f64 x-scale 6))) (fma.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) 2)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 y-scale y-scale)))))
(fma.f64 1/2 (/.f64 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) 2)) (.f64 x-scale x-scale)) (fma.f64 -1/4 (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 6)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) 2))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))) (fma.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) 2))) 2)) (pow.f64 x-scale 4))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))))
(fma.f64 1/2 (/.f64 (.f64 (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (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 y-scale y-scale))) 2) (.f64 x-scale x-scale)) (fma.f64 -1/4 (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 6)) (.f64 (/.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6)) (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (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 y-scale y-scale))) 2)) 2)))) (fma.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (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 y-scale y-scale))) 2)) 2)) (pow.f64 x-scale 4))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))))
(pow.f64 (.f64 y-scale (.f64 y-scale (*.f64 x-scale x-scale))) 1)
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.f64 (.f64 (*.f64 y-scale y-scale) x-scale) x-scale)
(sqrt.f64 (*.f64 (pow.f64 x-scale 4) (pow.f64 y-scale 4)))
(log.f64 (exp.f64 (.f64 y-scale (.f64 y-scale (*.f64 x-scale x-scale)))))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.f64 (.f64 (*.f64 y-scale y-scale) x-scale) x-scale)
(cbrt.f64 (.f64 (.f64 (.f64 (pow.f64 x-scale 4) (pow.f64 y-scale 4)) y-scale) (.f64 y-scale (*.f64 x-scale x-scale))))
(cbrt.f64 (.f64 (.f64 (.f64 x-scale x-scale) y-scale) (.f64 (pow.f64 x-scale 4) (*.f64 (pow.f64 y-scale 4) y-scale))))
(cbrt.f64 (*.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)))
(cbrt.f64 (.f64 (.f64 (.f64 y-scale y-scale) (pow.f64 y-scale 4)) (.f64 (*.f64 x-scale x-scale) (pow.f64 x-scale 4))))
(cbrt.f64 (.f64 (.f64 (.f64 x-scale x-scale) y-scale) (.f64 (pow.f64 x-scale 4) (*.f64 (pow.f64 y-scale 4) y-scale))))
(cbrt.f64 (*.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)))
(cbrt.f64 (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 x-scale 4)) (.f64 (*.f64 y-scale y-scale) (pow.f64 y-scale 4))))
(cbrt.f64 (.f64 (.f64 (.f64 x-scale x-scale) y-scale) (.f64 (pow.f64 x-scale 4) (*.f64 (pow.f64 y-scale 4) y-scale))))
(cbrt.f64 (*.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)))
(expm1.f64 (log1p.f64 (.f64 y-scale (.f64 y-scale (*.f64 x-scale x-scale)))))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.f64 (.f64 (*.f64 y-scale y-scale) x-scale) x-scale)
(exp.f64 (log.f64 (.f64 y-scale (.f64 y-scale (*.f64 x-scale x-scale)))))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.f64 (.f64 (*.f64 y-scale y-scale) x-scale) x-scale)
(log1p.f64 (expm1.f64 (.f64 y-scale (.f64 y-scale (*.f64 x-scale x-scale)))))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.f64 (.f64 (*.f64 y-scale y-scale) x-scale) x-scale)
(.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) 1)
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))
(.f64 1 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))
(.f64 (pow.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) 1/4) (pow.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) 1/4))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))
(.f64 (cbrt.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (cbrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))
(.f64 (cbrt.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (cbrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))
(.f64 (cbrt.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (cbrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2))))
(.f64 (cbrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) (cbrt.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(.f64 (cbrt.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (cbrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))
(.f64 (cbrt.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (cbrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2))))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) 2))) (sqrt.f64 (cbrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) 2))) (sqrt.f64 (cbrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)) 2))) (sqrt.f64 (cbrt.f64 (fma.f64 4 (.f64 (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 (.f64 y-scale y-scale) x-scale) x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))
(pow.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) 1/2)
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))
(pow.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) 1)
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))
(fabs.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))
(log.f64 (exp.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))
(cbrt.f64 (.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(cbrt.f64 (.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))))
(cbrt.f64 (pow.f64 (fma.f64 4 (.f64 (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 (.f64 y-scale y-scale) x-scale) x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)) 3/2))
(expm1.f64 (log1p.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))
(exp.f64 (log.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))
(log1p.f64 (expm1.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (.f64 y-scale y-scale) x-scale) x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))

localize473.0ms (0.3%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	65.9%	(/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.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 1 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a))))))
	64.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)))))
	59.4%	(cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))
	58.7%	(sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))

Compiler

Compiled 1303 to 789 computations (39.4% saved)

series108.0ms (0.1%)

Counts

1 → 60

Calls

15 calls:

Time	Variable		Point	Expression
11.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 1 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a))))))
10.0ms	b	@	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 1 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a))))))
10.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 1 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a))))))
9.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 1 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a))))))
9.0ms	b	@	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 1 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a))))))

rewrite74.0ms (0%)

Algorithm

1×	batch-egg-rewrite

Rules

1054×	`add-sqr-sqrt`
1040×	`*-un-lft-identity`
1028×	`pow1`
970×	`add-exp-log`
970×	`add-cbrt-cube`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	45	475
1	1021	475

Stop Event

1×	node limit

Counts

1 → 11

Calls

Call 1

Inputs

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

Outputs

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

simplify724.0ms (0.5%)

Algorithm

1×	egg-herbie

Rules

1658×	`associate-r`
1280×	`associate-l`
794×	`+-commutative`
770×	`associate-*r/`
708×	`*-commutative`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	928	134017
1	3542	133933

Stop Event

1×	node limit

Counts

71 → 128

Calls

Call 1

Inputs
(.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 (pow.f64 b 2) (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) (.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 (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) (pow.f64 b 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 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (pow.f64 a 2))) (.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 (pow.f64 b 2) (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) (.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 (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) (pow.f64 b 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 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (pow.f64 a 2))) (+.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 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.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) (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) (.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) (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 (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) (pow.f64 b 2)))))) (pow.f64 b 2))))))))
(+.f64 (.f64 1/2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (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) (pow.f64 b 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 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (pow.f64 a 2))) (+.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 (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 (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) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (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) (pow.f64 b 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 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (pow.f64 b 2)))) (pow.f64 b 2)))))) (.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) (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) (.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) (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 (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) (pow.f64 b 2)))))) (pow.f64 b 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)))) (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)))) (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))))) (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)))) (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)))) (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))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (pow.f64 a 2))) (+.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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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)) (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)))) (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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 4)))))
(+.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)))) (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))))) (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)) (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)) (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)))) (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))))) (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 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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)) (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)))) (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)) (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)))) (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)))) (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))))) (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)))) (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)))) (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))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (pow.f64 a 2))) (+.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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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)) (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)))) (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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 4)))))
(+.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)))) (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))))) (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)) (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)) (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)))) (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))))) (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 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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)) (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)))) (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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 4))))))
(.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 -1/1080 (/.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)))) (PI.f64)) (-.f64 (pow.f64 b 2) (pow.f64 a 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 1/699840000 (/.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)))) (pow.f64 (PI.f64) 3)) (-.f64 (pow.f64 b 2) (pow.f64 a 2)))) (.f64 -1/194400 (.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 -1/1080 (/.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)))) (PI.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/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 -1/1080 (/.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)))) (PI.f64)) (-.f64 (pow.f64 b 2) (pow.f64 a 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 1/125971200000 (.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 -1/1080 (/.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)))) (PI.f64)) (-.f64 (pow.f64 b 2) (pow.f64 a 2))))) (pow.f64 (PI.f64) 4))) (+.f64 (.f64 -1/952342272000000 (/.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)))) (pow.f64 (PI.f64) 5)) (-.f64 (pow.f64 b 2) (pow.f64 a 2)))) (.f64 -1/194400 (.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 (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 1/699840000 (/.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)))) (pow.f64 (PI.f64) 3)) (-.f64 (pow.f64 b 2) (pow.f64 a 2)))) (.f64 -1/194400 (.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 -1/1080 (/.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)))) (PI.f64)) (-.f64 (pow.f64 b 2) (pow.f64 a 2))))) (pow.f64 (PI.f64) 2))))) (pow.f64 (PI.f64) 2)))))))) (+.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 1/699840000 (/.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)))) (pow.f64 (PI.f64) 3)) (-.f64 (pow.f64 b 2) (pow.f64 a 2)))) (.f64 -1/194400 (.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 -1/1080 (/.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)))) (PI.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/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 -1/1080 (/.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)))) (PI.f64)) (-.f64 (pow.f64 b 2) (pow.f64 a 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 (-.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 (-.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 (-.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 (-.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 (-.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 (-.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 (-.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 (-.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) (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) (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) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 (/.f64 1 (.f64 (pow.f64 a 4) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (pow.f64 a 2))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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) (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) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 (/.f64 1 (.f64 (pow.f64 a 4) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (pow.f64 a 2))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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) (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 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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) (sin.f64 (.f64 1/180 (.f64 angle (PI.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) (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) (pow.f64 a 2))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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) (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) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 (/.f64 1 (.f64 (pow.f64 a 4) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (pow.f64 a 2))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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))))) (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) (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) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 (/.f64 1 (.f64 (pow.f64 a 4) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (pow.f64 a 2))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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) (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 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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) (sin.f64 (.f64 1/180 (.f64 angle (PI.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) (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) (pow.f64 a 2))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))) (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)) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-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)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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))))) (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)))) (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)) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-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)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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))))) (sin.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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 x-scale 2)) (+.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))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-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)))))) (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 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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)) (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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-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)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))))) (pow.f64 b 6))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-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)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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))))) (sin.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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 x-scale 2)) (+.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))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-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)))))) (sin.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)))) (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)) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-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)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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))))) (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)))) (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)) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-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)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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))))) (sin.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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 x-scale 2)) (+.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))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-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)))))) (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 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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)) (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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-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)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))))) (pow.f64 b 6))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-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)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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))))) (sin.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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 x-scale 2)) (+.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))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-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)))))) (sin.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)) (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)) (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)) (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)) (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)) (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)) (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)) (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)) (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)) (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)) (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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 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 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 (-.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/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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 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 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 (-.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/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 (-.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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 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 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 (-.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/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 (-.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 b 2) (pow.f64 (sin.f64 (.f64 1/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 (-.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)) (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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 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 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 (-.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/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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 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 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 (-.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/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 (-.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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.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 (-.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) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 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 (-.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/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 (-.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)) (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 (-.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 (-.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 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 b 2) (pow.f64 a 2)))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (-.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)) (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 (-.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 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 b 2) (pow.f64 a 2)))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (-.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)) (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 (-.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 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 b 2) (pow.f64 a 2)))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (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 (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 (-.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 (-.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 (-.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 (-.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 (-.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 (-.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 (-.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 (-.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 (-.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 (-.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 (-.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 (-.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 (-.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 (-.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 (-.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 (-.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 (-.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 (-.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 (-.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 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))))))

Outputs
(.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 (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) (sin.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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)))) (.f64 b (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(+.f64 (.f64 1/2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (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) (pow.f64 b 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 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (pow.f64 a 2))) (.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 (pow.f64 b 2) (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 (.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 (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 b b) (.f64 x-scale x-scale))) (.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 (.f64 b b) (.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))) (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 (.f64 b b) (.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)))))) (.f64 (.f64 b b) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))))) (.f64 a a)) (/.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) (sin.f64 (.f64 (*.f64 1/180 angle) (PI.f64)))))))
(.f64 1/2 (+.f64 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)))) (.f64 b (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 y-scale y-scale)))) (fma.f64 -1 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 b 4))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))) (.f64 b (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 a a))))
(+.f64 (.f64 1/2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (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) (pow.f64 b 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 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (pow.f64 a 2))) (+.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 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.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) (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) (.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) (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 (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) (pow.f64 b 2)))))) (pow.f64 b 2))))))))
(fma.f64 1/2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.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 (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 b b) (.f64 x-scale x-scale))) (.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 (.f64 b b) (.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))) (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 (.f64 b b) (.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)))))) (.f64 (.f64 b b) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))))) (.f64 a a)) (.f64 1/2 (+.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) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (.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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (.f64 b b) (.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))) (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 (.f64 b b) (.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))))))) (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) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (neg.f64 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (pow.f64 b 4))) (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 (.f64 b b) (.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))) (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 (.f64 b b) (.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)))))) (.f64 (.f64 b b) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (*.f64 b b))))))))
(fma.f64 1/2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 y-scale y-scale)))) (fma.f64 -1 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 b 4))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))) (.f64 b (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 a a)) (.f64 1/2 (+.f64 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)))) (.f64 b (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (.f64 (pow.f64 a 4) (-.f64 (.f64 (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)))) (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))) 1/2)) 2)) (.f64 b (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)))) -1/2)) (neg.f64 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 y-scale y-scale)))) (fma.f64 -1 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 b 4))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))) (.f64 b (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 b b))))))))
(+.f64 (.f64 1/2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (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) (pow.f64 b 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 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (pow.f64 a 2))) (+.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 (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 (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) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (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) (pow.f64 b 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 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (pow.f64 b 2)))) (pow.f64 b 2)))))) (.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) (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) (.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) (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 (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) (pow.f64 b 2)))))) (pow.f64 b 2)))))))))
(fma.f64 1/2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.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 (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 b b) (.f64 x-scale x-scale))) (.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 (.f64 b b) (.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))) (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 (.f64 b b) (.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)))))) (.f64 (.f64 b b) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))))) (.f64 a a)) (fma.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) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (.f64 1/2 (+.f64 (.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 (.f64 b b) (.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))) (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 (.f64 b b) (.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)))))) (.f64 b b)) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 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)))) (fma.f64 -4 (.f64 (/.f64 (.f64 b b) (.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))) (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 (.f64 b b) (.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)))))))) 2)) (.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (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 (.f64 b b) (.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))) (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 (.f64 b b) (.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)))))))) 2)) (.f64 (.f64 b b) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))) (neg.f64 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.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 (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 b b) (.f64 x-scale x-scale))) (.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 (.f64 b b) (.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))) (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 (.f64 b b) (.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)))))) (.f64 (.f64 b b) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))))) (.f64 b b)))) (.f64 b b))))) (.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 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (.f64 b b) (.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))) (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 (.f64 b b) (.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))))))) (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) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (neg.f64 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (pow.f64 b 4))) (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 (.f64 b b) (.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))) (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 (.f64 b b) (.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)))))) (.f64 (.f64 b b) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (*.f64 b b)))))))))
(fma.f64 1/2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 y-scale y-scale)))) (fma.f64 -1 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 b 4))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))) (.f64 b (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 a a)) (fma.f64 1/2 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)))) (.f64 b (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (.f64 1/2 (+.f64 (.f64 (pow.f64 a 4) (-.f64 (.f64 (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)))) (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))) 1/2)) 2)) (.f64 b (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)))) -1/2)) (neg.f64 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 y-scale y-scale)))) (fma.f64 -1 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 b 4))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))) (.f64 b (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 b b))))) (.f64 (pow.f64 a 6) (-.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)))) (.f64 (.f64 (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))) (.f64 b b)) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)))) (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))) 1/2)) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2))))) 1/4)) (neg.f64 (/.f64 (-.f64 (.f64 (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)))) (.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))) 1/2)) 2)) (.f64 b (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)))) -1/2)) (neg.f64 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 y-scale y-scale)))) (fma.f64 -1 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 b 4))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))) (.f64 b (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 b b)))) (*.f64 b b)))))))))
(.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)))) (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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))
(/.f64 (.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) -1/2) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))
(+.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)))) (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))))) (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)))) (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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.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))) (.f64 2 (.f64 (-.f64 (/.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))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 b b)))) (.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (sin.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 (PI.f64) (.f64 angle 1/180))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 b b)))) (.f64 a a)) (/.f64 (.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) -1/2) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))
(+.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)))) (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))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (pow.f64 a 2))) (+.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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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)) (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)))) (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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 4)))))
(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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.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))) (.f64 2 (.f64 (-.f64 (/.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))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 b b)))) (.f64 a a)) (fma.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.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))) (.f64 2 (.f64 (-.f64 (/.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)) (sin.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.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))) (.f64 2 (.f64 (-.f64 (/.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))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 b b))))))) (pow.f64 a 4)))))
(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 (PI.f64) (.f64 angle 1/180))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 b b)))) (.f64 a a)) (fma.f64 -1/2 (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)) (pow.f64 (.f64 (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))))) (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) 1/2)) 2)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (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 (PI.f64) (.f64 angle 1/180))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 b b))))))) (pow.f64 a 4)))))
(+.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)))) (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))))) (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)) (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)) (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)))) (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))))) (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 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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)) (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)))) (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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 4))))))
(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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.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))) (.f64 2 (.f64 (-.f64 (/.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))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 b b)))) (.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (/.f64 (-.f64 (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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.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))) (.f64 2 (.f64 (-.f64 (/.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))) (/.f64 (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.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))) (.f64 2 (.f64 (-.f64 (/.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)))))) (sin.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.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))) (.f64 2 (.f64 (-.f64 (/.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (sin.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.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))) (.f64 2 (.f64 (-.f64 (/.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))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 b b)))))))))) (pow.f64 a 6)) (fma.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.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))) (.f64 2 (.f64 (-.f64 (/.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)) (sin.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.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))) (.f64 2 (.f64 (-.f64 (/.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))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 b b))))))) (pow.f64 a 4))))))
(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 (PI.f64) (.f64 angle 1/180))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 b b)))) (.f64 a a)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 -1/4 (.f64 (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)) (pow.f64 (.f64 (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))))) (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) 1/2)) 2)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))) (.f64 (/.f64 (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (.f64 1/2 (/.f64 (.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)) (pow.f64 (.f64 (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))))) (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) 1/2)) 2)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (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 (PI.f64) (.f64 angle 1/180))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 b b)))))))))) (pow.f64 a 6)) (fma.f64 -1/2 (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)) (pow.f64 (.f64 (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))))) (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) 1/2)) 2)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (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 (PI.f64) (.f64 angle 1/180))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 b b))))))) (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)))) (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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))
(/.f64 (.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) -1/2) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))
(+.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)))) (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))))) (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)))) (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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.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))) (.f64 2 (.f64 (-.f64 (/.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))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 b b)))) (.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (sin.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 (PI.f64) (.f64 angle 1/180))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 b b)))) (.f64 a a)) (/.f64 (.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) -1/2) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))
(+.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)))) (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))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (pow.f64 a 2))) (+.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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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)) (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)))) (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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 4)))))
(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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.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))) (.f64 2 (.f64 (-.f64 (/.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))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 b b)))) (.f64 a a)) (fma.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.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))) (.f64 2 (.f64 (-.f64 (/.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)) (sin.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.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))) (.f64 2 (.f64 (-.f64 (/.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))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 b b))))))) (pow.f64 a 4)))))
(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 (PI.f64) (.f64 angle 1/180))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 b b)))) (.f64 a a)) (fma.f64 -1/2 (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)) (pow.f64 (.f64 (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))))) (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) 1/2)) 2)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (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 (PI.f64) (.f64 angle 1/180))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 b b))))))) (pow.f64 a 4)))))
(+.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)))) (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))))) (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)) (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)) (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)))) (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))))) (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 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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)) (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)))) (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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 4))))))
(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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.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))) (.f64 2 (.f64 (-.f64 (/.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))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 b b)))) (.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (/.f64 (-.f64 (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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.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))) (.f64 2 (.f64 (-.f64 (/.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))) (/.f64 (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.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))) (.f64 2 (.f64 (-.f64 (/.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)))))) (sin.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.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))) (.f64 2 (.f64 (-.f64 (/.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (sin.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.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))) (.f64 2 (.f64 (-.f64 (/.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))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 b b)))))))))) (pow.f64 a 6)) (fma.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.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))) (.f64 2 (.f64 (-.f64 (/.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)) (sin.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.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))) (.f64 2 (.f64 (-.f64 (/.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))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 b b))))))) (pow.f64 a 4))))))
(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 (PI.f64) (.f64 angle 1/180))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 b b)))) (.f64 a a)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 -1/4 (.f64 (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)) (pow.f64 (.f64 (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))))) (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) 1/2)) 2)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))) (.f64 (/.f64 (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (.f64 1/2 (/.f64 (.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)) (pow.f64 (.f64 (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))))) (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) 1/2)) 2)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (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 (PI.f64) (.f64 angle 1/180))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 b b)))))))))) (pow.f64 a 6)) (fma.f64 -1/2 (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)) (pow.f64 (.f64 (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))))) (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) 1/2)) 2)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (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 (PI.f64) (.f64 angle 1/180))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.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)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 b b))))))) (pow.f64 a 4))))))
(.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 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) angle) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))
(/.f64 (.f64 180 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (PI.f64) (.f64 (-.f64 (.f64 b b) (*.f64 a a)) angle)))
(+.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 -1/1080 (/.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)))) (PI.f64)) (-.f64 (pow.f64 b 2) (pow.f64 a 2))))))))
(fma.f64 90 (/.f64 (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) 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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.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 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 1/1080 (/.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 b b) (*.f64 a a)) (PI.f64)))))))
(+.f64 (/.f64 (.f64 180 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (PI.f64) (.f64 (-.f64 (.f64 b b) (.f64 a a)) angle))) (.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 (.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) 1/32400) (.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/2 (/.f64 (fma.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 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) 1/32400) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 1/8100 (pow.f64 (PI.f64) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale (.f64 y-scale (.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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 1/1080 (/.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 b b) (.f64 a a)) (PI.f64))))) (*.f64 angle 1/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 1/699840000 (/.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)))) (pow.f64 (PI.f64) 3)) (-.f64 (pow.f64 b 2) (pow.f64 a 2)))) (.f64 -1/194400 (.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 -1/1080 (/.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)))) (PI.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/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 -1/1080 (/.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)))) (PI.f64)) (-.f64 (pow.f64 b 2) (pow.f64 a 2)))))))))
(fma.f64 90 (/.f64 (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) angle) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 1/2 (+.f64 (.f64 (pow.f64 angle 3) (-.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))))) (fma.f64 2/45 (/.f64 (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (pow.f64 (PI.f64) 3) x-scale)) -1/8748000) (/.f64 (.f64 y-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.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 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 1/699840000 (/.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 b b) (.f64 a a)) (pow.f64 (PI.f64) 3))) (.f64 -1/194400 (.f64 (pow.f64 (PI.f64) 2) (+.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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.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 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 1/1080 (/.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 b b) (.f64 a a)) (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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.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 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 1/1080 (/.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 b b) (.f64 a a)) (PI.f64)))))))))
(+.f64 (/.f64 (.f64 180 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (PI.f64) (.f64 (-.f64 (.f64 b b) (.f64 a a)) angle))) (.f64 1/2 (+.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 (.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) 1/32400) (.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/2 (/.f64 (fma.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 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) 1/32400) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 1/8100 (pow.f64 (PI.f64) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale (.f64 y-scale (.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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 1/1080 (/.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 b b) (.f64 a a)) (PI.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 b b) (.f64 a a)) -1/8748000) (/.f64 (.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) y-scale) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) x-scale)) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.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 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) 1/32400) (.f64 y-scale y-scale)))) 2)))) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) 1/32400) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 1/8100 (pow.f64 (PI.f64) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale (.f64 y-scale (.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 1/699840000 (/.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 b b) (.f64 a a)) (pow.f64 (PI.f64) 3))) (.f64 (pow.f64 (PI.f64) 2) (.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 (.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) 1/32400) (.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/2 (/.f64 (fma.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 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) 1/32400) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 1/8100 (pow.f64 (PI.f64) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale (.f64 y-scale (.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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 1/1080 (/.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 b b) (.f64 a a)) (PI.f64))))) -1/194400))))))))
(+.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 1/125971200000 (.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 -1/1080 (/.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)))) (PI.f64)) (-.f64 (pow.f64 b 2) (pow.f64 a 2))))) (pow.f64 (PI.f64) 4))) (+.f64 (.f64 -1/952342272000000 (/.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)))) (pow.f64 (PI.f64) 5)) (-.f64 (pow.f64 b 2) (pow.f64 a 2)))) (.f64 -1/194400 (.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 (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 1/699840000 (/.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)))) (pow.f64 (PI.f64) 3)) (-.f64 (pow.f64 b 2) (pow.f64 a 2)))) (.f64 -1/194400 (.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 -1/1080 (/.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)))) (PI.f64)) (-.f64 (pow.f64 b 2) (pow.f64 a 2))))) (pow.f64 (PI.f64) 2))))) (pow.f64 (PI.f64) 2)))))))) (+.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 1/699840000 (/.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)))) (pow.f64 (PI.f64) 3)) (-.f64 (pow.f64 b 2) (pow.f64 a 2)))) (.f64 -1/194400 (.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 -1/1080 (/.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)))) (PI.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/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 -1/1080 (/.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)))) (PI.f64)) (-.f64 (pow.f64 b 2) (pow.f64 a 2))))))))))
(fma.f64 90 (/.f64 (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) 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 (.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 1/2 (/.f64 (+.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))))) (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a)))))) (fma.f64 4 (pow.f64 (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (pow.f64 (PI.f64) 3) x-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 y-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))) (.f64 -1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (+.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 (.f64 b b) (.f64 a a)) x-scale) (/.f64 (.f64 (PI.f64) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (pow.f64 (PI.f64) 3) x-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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.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 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) 2)) (/.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) 2) (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.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 1/125971200000 (.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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.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 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 1/1080 (/.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 b b) (.f64 a a)) (PI.f64))))) (pow.f64 (PI.f64) 4)) (fma.f64 -1/952342272000000 (/.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 b b) (.f64 a a)) (pow.f64 (PI.f64) 5))) (.f64 -1/194400 (.f64 (pow.f64 (PI.f64) 2) (-.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))))) (+.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 (.f64 b b) (.f64 a a)) x-scale) (/.f64 (.f64 (PI.f64) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (pow.f64 (PI.f64) 3) x-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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.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 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 1/699840000 (/.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 b b) (.f64 a a)) (pow.f64 (PI.f64) 3))) (.f64 -1/194400 (.f64 (pow.f64 (PI.f64) 2) (+.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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.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 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 1/1080 (/.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 b b) (.f64 a a)) (PI.f64))))))))))))))) (.f64 1/2 (+.f64 (.f64 (pow.f64 angle 3) (-.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))))) (fma.f64 2/45 (/.f64 (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (pow.f64 (PI.f64) 3) x-scale)) -1/8748000) (/.f64 (.f64 y-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.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 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 1/699840000 (/.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 b b) (.f64 a a)) (pow.f64 (PI.f64) 3))) (.f64 -1/194400 (.f64 (pow.f64 (PI.f64) 2) (+.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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.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 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 1/1080 (/.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 b b) (.f64 a a)) (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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.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 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 1/1080 (/.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 b b) (*.f64 a a)) (PI.f64))))))))))
(+.f64 (/.f64 (.f64 180 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (PI.f64) (.f64 (-.f64 (.f64 b b) (.f64 a a)) angle))) (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 (.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 (pow.f64 (PI.f64) 6) (.f64 1/765275040000000 (.f64 a a))) (.f64 x-scale x-scale)))) (.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 (.f64 (pow.f64 (PI.f64) 6) (.f64 1/765275040000000 (.f64 a a))) (.f64 x-scale x-scale)) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)))) (/.f64 (.f64 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 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) 1/32400) (.f64 y-scale y-scale)))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a)))))) (fma.f64 4 (pow.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000) (/.f64 (.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) 2) (.f64 2/45 (/.f64 (fma.f64 1/22674816000000 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (pow.f64 (PI.f64) 5) x-scale)) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (.f64 (/.f64 (pow.f64 (PI.f64) 5) x-scale) 1/1511654400000))) (/.f64 (.f64 y-scale x-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))))) (fma.f64 2/45 (.f64 (/.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000) (/.f64 (.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) y-scale) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) x-scale)) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.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 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) 1/32400) (.f64 y-scale y-scale)))) 2)))) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) 1/32400) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 1/8100 (pow.f64 (PI.f64) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale (.f64 y-scale (.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 (.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) 1/32400) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 1/8100 (pow.f64 (PI.f64) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale (.f64 y-scale (.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 1/125971200000 (.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 (.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) 1/32400) (.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/2 (/.f64 (fma.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 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) 1/32400) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 1/8100 (pow.f64 (PI.f64) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale (.f64 y-scale (.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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 1/1080 (/.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 b b) (.f64 a a)) (PI.f64))))) (pow.f64 (PI.f64) 4)) (fma.f64 -1/952342272000000 (/.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 b b) (.f64 a a)) (pow.f64 (PI.f64) 5))) (.f64 (pow.f64 (PI.f64) 2) (.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 2/45 (.f64 (/.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000) (/.f64 (.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) y-scale) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) x-scale)) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.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 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) 1/32400) (.f64 y-scale y-scale)))) 2)))) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) 1/32400) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 1/8100 (pow.f64 (PI.f64) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale (.f64 y-scale (.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 1/699840000 (/.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 b b) (.f64 a a)) (pow.f64 (PI.f64) 3))) (.f64 (pow.f64 (PI.f64) 2) (.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 (.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) 1/32400) (.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/2 (/.f64 (fma.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 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) 1/32400) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 1/8100 (pow.f64 (PI.f64) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale (.f64 y-scale (.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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 1/1080 (/.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 b b) (.f64 a a)) (PI.f64))))) -1/194400)))) -1/194400)))))) (.f64 1/2 (+.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 (.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) 1/32400) (.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/2 (/.f64 (fma.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 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) 1/32400) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 1/8100 (pow.f64 (PI.f64) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale (.f64 y-scale (.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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 1/1080 (/.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 b b) (.f64 a a)) (PI.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 b b) (.f64 a a)) -1/8748000) (/.f64 (.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) y-scale) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) x-scale)) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.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 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) 1/32400) (.f64 y-scale y-scale)))) 2)))) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) 1/32400) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 1/8100 (pow.f64 (PI.f64) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale (.f64 y-scale (.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 1/699840000 (/.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 b b) (.f64 a a)) (pow.f64 (PI.f64) 3))) (.f64 (pow.f64 (PI.f64) 2) (.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 (.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) 1/32400) (.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/2 (/.f64 (fma.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 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) 1/32400) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 1/8100 (pow.f64 (PI.f64) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale (.f64 y-scale (.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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 1/1080 (/.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 b b) (.f64 a a)) (PI.f64))))) -1/194400)))))))))
(.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 (-.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (sqrt.f64 (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 1/2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.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 (-.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (sqrt.f64 (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 1/2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.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 (-.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (sqrt.f64 (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 1/2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.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 (-.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (sqrt.f64 (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 1/2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.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 (-.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (sqrt.f64 (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 1/2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.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 (-.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (sqrt.f64 (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 1/2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.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 (-.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (sqrt.f64 (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 1/2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.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 (-.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (sqrt.f64 (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 1/2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.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) (sin.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 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 a a))))
(.f64 -1/2 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale)))))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (*.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) (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) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 (/.f64 1 (.f64 (pow.f64 a 4) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (pow.f64 a 2))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 a a))) (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 a a))) (fma.f64 (/.f64 (/.f64 1 (pow.f64 a 4)) (sin.f64 (.f64 (.f64 1/180 angle) (PI.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 a a))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (.f64 y-scale y-scale) (.f64 (sin.f64 (.f64 (.f64 1/180 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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale)))))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 a a))) (.f64 (-.f64 (fma.f64 -1 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.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)) (.f64 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 a a))) (fma.f64 (/.f64 (/.f64 1 (pow.f64 a 4)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (.f64 x-scale (.f64 a a)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 (.f64 b b) 1/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) (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) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 (/.f64 1 (.f64 (pow.f64 a 4) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (pow.f64 a 2))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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) (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 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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) (sin.f64 (.f64 1/180 (.f64 angle (PI.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) (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) (pow.f64 a 2))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 a a))) (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 a a))) (fma.f64 (/.f64 (/.f64 1 (pow.f64 a 4)) (sin.f64 (.f64 (.f64 1/180 angle) (PI.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 a a))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (.f64 y-scale y-scale) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 a a)))))) (.f64 (pow.f64 b 4) (-.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale)))))) 2)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 a a))))) (neg.f64 (/.f64 (-.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))) (/.f64 (/.f64 1 (pow.f64 a 4)) (sin.f64 (.f64 (.f64 1/180 angle) (PI.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 a a))) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 a a))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (.f64 y-scale y-scale) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 a a))))) (.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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale)))))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 a a))) (.f64 1/2 (+.f64 (.f64 (.f64 b b) (-.f64 (fma.f64 -1 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.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)) (.f64 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 a a))) (fma.f64 (/.f64 (/.f64 1 (pow.f64 a 4)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (.f64 x-scale (.f64 a a)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (.f64 (pow.f64 b 4) (-.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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale)))))))) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)) (pow.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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.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)) (.f64 x-scale x-scale))))) 1/2)) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 a a))))) (neg.f64 (/.f64 (-.f64 (fma.f64 -1 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.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)) (.f64 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 a a))) (fma.f64 (/.f64 (/.f64 1 (pow.f64 a 4)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (.f64 x-scale (.f64 a a)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 a a) (.f64 y-scale y-scale))))) (*.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) (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) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 (/.f64 1 (.f64 (pow.f64 a 4) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (pow.f64 a 2))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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))))) (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) (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) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 (/.f64 1 (.f64 (pow.f64 a 4) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (pow.f64 a 2))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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) (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 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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) (sin.f64 (.f64 1/180 (.f64 angle (PI.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) (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) (pow.f64 a 2))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 a a))) (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 a a))) (fma.f64 (/.f64 (/.f64 1 (pow.f64 a 4)) (sin.f64 (.f64 (.f64 1/180 angle) (PI.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 a a))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (.f64 y-scale y-scale) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 a a)))))) (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 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 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))))) (/.f64 (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale)))))) 2)))))) (neg.f64 (/.f64 (-.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale)))))) 2)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 a a))))) (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 a a))) (fma.f64 (/.f64 (/.f64 1 (pow.f64 a 4)) (sin.f64 (.f64 (.f64 1/180 angle) (PI.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 a a))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (.f64 y-scale y-scale) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 a a))))) (.f64 a a)))) (.f64 a a))))) (.f64 (pow.f64 b 4) (-.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale)))))) 2)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 a a))))) (neg.f64 (/.f64 (-.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))))) (/.f64 (/.f64 1 (pow.f64 a 4)) (sin.f64 (.f64 (.f64 1/180 angle) (PI.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 a a))) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 a a))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (.f64 y-scale y-scale) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 a a))))) (*.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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale)))))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 a a))) (fma.f64 1/2 (.f64 (.f64 b b) (-.f64 (fma.f64 -1 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.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)) (.f64 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 a a))) (fma.f64 (/.f64 (/.f64 1 (pow.f64 a 4)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (.f64 x-scale (.f64 a a)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (.f64 1/2 (+.f64 (.f64 (pow.f64 b 4) (-.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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale)))))))) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)) (pow.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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.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)) (.f64 x-scale x-scale))))) 1/2)) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 a a))))) (neg.f64 (/.f64 (-.f64 (fma.f64 -1 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.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)) (.f64 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 a a))) (fma.f64 (/.f64 (/.f64 1 (pow.f64 a 4)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (.f64 x-scale (.f64 a a)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 a a))))) (.f64 (pow.f64 b 6) (-.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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.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)) (.f64 x-scale x-scale)))))) (/.f64 (.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 a a))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)) (pow.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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.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)) (.f64 x-scale x-scale))))) 1/2)) 2))))) (neg.f64 (/.f64 (-.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale)))))))) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)) (pow.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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.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)) (.f64 x-scale x-scale))))) 1/2)) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 a a))))) (neg.f64 (/.f64 (-.f64 (fma.f64 -1 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.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)) (.f64 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 a a))) (fma.f64 (/.f64 (/.f64 1 (pow.f64 a 4)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (.f64 x-scale (.f64 a a)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))
(/.f64 (.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) 1/2) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-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)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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))))) (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(.f64 1/2 (+.f64 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (sin.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 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (neg.f64 (/.f64 (.f64 a a) (/.f64 (sin.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))))))) (.f64 b b)) (/.f64 (-.f64 (/.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))
(.f64 1/2 (+.f64 (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (neg.f64 (/.f64 (.f64 a a) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))))))))) (.f64 b b))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-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)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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))))) (sin.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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 x-scale 2)) (+.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))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-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)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))) (pow.f64 b 4)))))
(fma.f64 1/2 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (sin.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 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (neg.f64 (/.f64 (.f64 a a) (/.f64 (sin.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))))))) (.f64 b b)) (.f64 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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (/.f64 (-.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))) 2))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (sin.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 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (neg.f64 (/.f64 (.f64 a a) (/.f64 (sin.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))))))))) (pow.f64 b 4)))))
(fma.f64 1/2 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (neg.f64 (/.f64 (.f64 a a) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))))))))) (.f64 b b)) (.f64 1/2 (+.f64 (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 (-.f64 (.f64 -1/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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (-.f64 (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.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)) (.f64 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))))) 2))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (neg.f64 (.f64 a (.f64 a (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (neg.f64 (/.f64 (.f64 a a) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2))))))))))))) (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)) (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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-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)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))))) (pow.f64 b 6))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-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)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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))))) (sin.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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 x-scale 2)) (+.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))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-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)))))) (sin.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))) 2))) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))) (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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))) 2))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (sin.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 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (neg.f64 (/.f64 (.f64 a a) (/.f64 (sin.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))))))))))))) (pow.f64 b 6)) (fma.f64 1/2 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (sin.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 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (neg.f64 (/.f64 (.f64 a a) (/.f64 (sin.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))))))) (.f64 b b)) (.f64 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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (/.f64 (-.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))) 2))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (sin.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 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (neg.f64 (/.f64 (.f64 a a) (/.f64 (sin.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))))))))))) (pow.f64 b 4))))))
(fma.f64 1/2 (/.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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (-.f64 (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.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)) (.f64 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))))) 2))) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))) (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) (neg.f64 (.f64 a (.f64 a (-.f64 (.f64 -1/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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (-.f64 (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.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)) (.f64 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))))) 2))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (neg.f64 (.f64 a (.f64 a (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (neg.f64 (/.f64 (.f64 a a) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))))))))))))))))) (pow.f64 b 6)) (fma.f64 1/2 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (neg.f64 (/.f64 (.f64 a a) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))))))))) (.f64 b b)) (.f64 1/2 (+.f64 (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 (-.f64 (.f64 -1/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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (-.f64 (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.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)) (.f64 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))))) 2))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (neg.f64 (.f64 a (.f64 a (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (neg.f64 (/.f64 (.f64 a a) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))
(/.f64 (.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) 1/2) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-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)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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))))) (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(.f64 1/2 (+.f64 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (sin.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 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (neg.f64 (/.f64 (.f64 a a) (/.f64 (sin.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))))))) (.f64 b b)) (/.f64 (-.f64 (/.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))
(.f64 1/2 (+.f64 (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (neg.f64 (/.f64 (.f64 a a) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))))))))) (.f64 b b))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-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)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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))))) (sin.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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 x-scale 2)) (+.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))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-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)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))) (pow.f64 b 4)))))
(fma.f64 1/2 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (sin.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 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (neg.f64 (/.f64 (.f64 a a) (/.f64 (sin.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))))))) (.f64 b b)) (.f64 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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (/.f64 (-.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))) 2))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (sin.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 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (neg.f64 (/.f64 (.f64 a a) (/.f64 (sin.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))))))))) (pow.f64 b 4)))))
(fma.f64 1/2 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (neg.f64 (/.f64 (.f64 a a) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))))))))) (.f64 b b)) (.f64 1/2 (+.f64 (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 (-.f64 (.f64 -1/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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (-.f64 (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.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)) (.f64 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))))) 2))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (neg.f64 (.f64 a (.f64 a (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (neg.f64 (/.f64 (.f64 a a) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2))))))))))))) (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)) (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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-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)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))))) (pow.f64 b 6))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-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)))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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))))) (sin.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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 x-scale 2)) (+.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))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-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)))))) (sin.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))) 2))) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))) (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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))) 2))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (sin.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 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (neg.f64 (/.f64 (.f64 a a) (/.f64 (sin.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))))))))))))) (pow.f64 b 6)) (fma.f64 1/2 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (sin.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 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (neg.f64 (/.f64 (.f64 a a) (/.f64 (sin.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))))))) (.f64 b b)) (.f64 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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (/.f64 (-.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-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 x-scale x-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))) 2))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (sin.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 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (neg.f64 (/.f64 (.f64 a a) (/.f64 (sin.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 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))))))))))) (pow.f64 b 4))))))
(fma.f64 1/2 (/.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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (-.f64 (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.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)) (.f64 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))))) 2))) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))) (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) (neg.f64 (.f64 a (.f64 a (-.f64 (.f64 -1/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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (-.f64 (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.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)) (.f64 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))))) 2))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (neg.f64 (.f64 a (.f64 a (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (neg.f64 (/.f64 (.f64 a a) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))))))))))))))))) (pow.f64 b 6)) (fma.f64 1/2 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (neg.f64 (/.f64 (.f64 a a) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))))))))) (.f64 b b)) (.f64 1/2 (+.f64 (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 (-.f64 (.f64 -1/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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (-.f64 (.f64 4 (/.f64 (.f64 (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) (pow.f64 a 4))) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.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)) (.f64 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))))) 2))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (neg.f64 (.f64 a (.f64 a (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -4 (/.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (.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)) (.f64 y-scale y-scale))))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (neg.f64 (/.f64 (.f64 a a) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))))))))))))) (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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 -1/2 (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))
(/.f64 (.f64 -1/2 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) -2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.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)) (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)) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 -1/4 (.f64 (/.f64 (.f64 y-scale y-scale) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (.f64 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))))
(fma.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) -2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 -1/4 (/.f64 (.f64 y-scale y-scale) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))))) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) -2))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a)))) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.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)) (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)) (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)) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 -1/4 (.f64 (/.f64 (.f64 y-scale y-scale) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (.f64 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 1/8 (/.f64 (pow.f64 y-scale 4) (/.f64 (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2))) (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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))))))))
(fma.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) -2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 -1/4 (.f64 (/.f64 (.f64 y-scale y-scale) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a)))) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) -2))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a)))) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 1/8 (/.f64 (pow.f64 y-scale 4) (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) 2))) (.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) -2))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) -2))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.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)) (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)) (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)) (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)) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 -1/4 (.f64 (/.f64 (.f64 y-scale y-scale) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (.f64 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))) (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 (-.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)) (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 (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 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (-.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 1/8 (/.f64 (pow.f64 y-scale 4) (/.f64 (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2))) (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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)))))))))
(fma.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) -2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 -1/4 (.f64 (/.f64 (.f64 y-scale y-scale) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a)))) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) -2))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a)))) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 1/4 (.f64 (/.f64 (pow.f64 y-scale 6) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a)))) (/.f64 (fma.f64 -1/4 (/.f64 (.f64 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) -2))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a)))) 2)) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) 2)) (.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) -2))) (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) -2))))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) 2)) (pow.f64 (/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) -2))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a)))) 2)) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a)))) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 1/8 (/.f64 (pow.f64 y-scale 4) (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) 2))) (.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) -2))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) -2))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.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)) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (*.f64 a a)))))
(/.f64 (.f64 -1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (.f64 a a))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 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 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 (-.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/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)) (sin.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))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (/.f64 (.f64 b b) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 1/180 angle) (PI.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 y-scale y-scale)) (.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))
(fma.f64 1/2 (/.f64 (+.f64 (+.f64 (.f64 (/.f64 (.f64 a a) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 (.f64 b b) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) -2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 -1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (.f64 a a)))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 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 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 (-.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/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 (-.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)) (sin.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))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (/.f64 (.f64 b b) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 1/180 angle) (PI.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 y-scale y-scale)) (fma.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))))
(fma.f64 1/2 (/.f64 (+.f64 (+.f64 (.f64 (/.f64 (.f64 a a) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 (.f64 b b) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) -2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))))))) (.f64 y-scale y-scale)) (fma.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) -2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 y-scale 4)))) (/.f64 (.f64 -1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (.f64 a a))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 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 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 (-.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/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 (-.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 b 2) (pow.f64 (sin.f64 (.f64 1/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 (-.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)) (sin.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))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (/.f64 (.f64 b b) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 1/180 angle) (PI.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 y-scale y-scale)) (fma.f64 1/8 (/.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 (pow.f64 y-scale 6) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))) (-.f64 (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)))) (fma.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (*.f64 a a))))))))
(fma.f64 1/2 (/.f64 (+.f64 (+.f64 (.f64 (/.f64 (.f64 a a) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 (.f64 b b) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) -2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))))))) (.f64 y-scale y-scale)) (fma.f64 1/8 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) -2))) (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (pow.f64 y-scale 6))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) -2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) 2)))) (fma.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) -2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 y-scale 4)))) (/.f64 (.f64 -1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.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)) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (*.f64 a a)))))
(/.f64 (.f64 -1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (.f64 a a))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 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 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 (-.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/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)) (sin.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))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (/.f64 (.f64 b b) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 1/180 angle) (PI.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 y-scale y-scale)) (.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))
(fma.f64 1/2 (/.f64 (+.f64 (+.f64 (.f64 (/.f64 (.f64 a a) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 (.f64 b b) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) -2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 -1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (.f64 a a)))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 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 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 (-.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/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 (-.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)) (sin.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))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (/.f64 (.f64 b b) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 1/180 angle) (PI.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 y-scale y-scale)) (fma.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))))
(fma.f64 1/2 (/.f64 (+.f64 (+.f64 (.f64 (/.f64 (.f64 a a) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 (.f64 b b) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) -2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))))))) (.f64 y-scale y-scale)) (fma.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) -2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 y-scale 4)))) (/.f64 (.f64 -1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (.f64 a a))))))
(+.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 (-.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) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 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 (-.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/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 (-.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)) (sin.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))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (/.f64 (.f64 b b) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 1/180 angle) (PI.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 y-scale y-scale)) (fma.f64 1/8 (/.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 (pow.f64 y-scale 6) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))) (-.f64 (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)))) (fma.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (*.f64 a a))))))))
(fma.f64 1/2 (/.f64 (+.f64 (+.f64 (.f64 (/.f64 (.f64 a a) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 (.f64 b b) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) -2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))))))) (.f64 y-scale y-scale)) (fma.f64 1/8 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) -2))) (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (pow.f64 y-scale 6))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) -2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) 2)))) (fma.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a))) -2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 y-scale 4)))) (/.f64 (.f64 -1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.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 (-.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 (.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.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 (-.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 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 b 2) (pow.f64 a 2)))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (-.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 1/2 (-.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))) (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))))) (.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.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))))))))
(fma.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 x-scale x-scale)))) (.f64 1/2 (+.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (fma.f64 (.f64 b 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 a a)))))))))))
(+.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)) (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 (-.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 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 b 2) (pow.f64 a 2)))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 1/2 (-.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))) (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))))) (.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.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)))))))))
(fma.f64 -1/4 (/.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (fma.f64 (.f64 b 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 a a)))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) 1/2) (fma.f64 (.f64 b 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 a a)))) 2))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 x-scale x-scale)))) (.f64 1/2 (+.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (fma.f64 (.f64 b 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 a a))))))))))))
(+.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)) (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 (-.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 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 b 2) (pow.f64 a 2)))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (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 (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/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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 1/2 (-.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))) (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))))) (.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.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)))))) (.f64 1/8 (/.f64 (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2))) (fma.f64 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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) 2))))))))
(fma.f64 -1/4 (/.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (fma.f64 (.f64 b 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 a a)))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) 1/2) (fma.f64 (.f64 b 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 a a)))) 2))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 x-scale x-scale)))) (fma.f64 1/2 (+.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (fma.f64 (.f64 b 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 a a))))))))) (.f64 1/8 (/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) 1/2) (fma.f64 (.f64 b 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 a a)))) 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (pow.f64 x-scale 4))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 (fma.f64 (.f64 b 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 a a))) 2)) (fma.f64 (.f64 b 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 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 (-.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))
(.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (*.f64 x-scale x-scale)))))
(+.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 (-.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 (-.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (.f64 (pow.f64 x-scale 4) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))) (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (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 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 x-scale 4)))) (.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 x-scale x-scale))))))
(+.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 (-.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 (-.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 (-.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (.f64 (pow.f64 x-scale 4) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 (sin.f64 (.f64 (.f64 1/180 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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (pow.f64 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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (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 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 3)))) (.f64 -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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (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 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 x-scale 4)))) (fma.f64 1/8 (.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b 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 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 3))))) (.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (*.f64 x-scale x-scale)))))))
(+.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 (-.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 (-.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 (-.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 (-.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (.f64 (pow.f64 x-scale 4) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 (sin.f64 (.f64 (.f64 1/180 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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (pow.f64 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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (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 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 3)))) (fma.f64 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 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 4) (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (-.f64 (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2))))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (.f64 (pow.f64 x-scale 8) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))) (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (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 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 x-scale 4)))) (fma.f64 1/8 (.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b 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 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 3))))) (fma.f64 1/4 (/.f64 (fma.f64 -1/4 (/.f64 (.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b 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 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))) 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 4)) (pow.f64 (/.f64 (.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b 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 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))) 2)) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 x-scale 8)))) (.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (*.f64 x-scale x-scale))))))))
(.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 (-.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))
(.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (*.f64 x-scale x-scale)))))
(+.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 (-.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 (-.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (.f64 (pow.f64 x-scale 4) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))) (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (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 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 x-scale 4)))) (.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 x-scale x-scale))))))
(+.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 (-.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 (-.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 (-.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (.f64 (pow.f64 x-scale 4) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 (sin.f64 (.f64 (.f64 1/180 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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (pow.f64 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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (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 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 3)))) (.f64 -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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (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 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 x-scale 4)))) (fma.f64 1/8 (.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b 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 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 3))))) (.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (*.f64 x-scale x-scale)))))))
(+.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 (-.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 (-.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 (-.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 (-.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (.f64 (pow.f64 x-scale 4) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 (sin.f64 (.f64 (.f64 1/180 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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (pow.f64 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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (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 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 3)))) (fma.f64 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 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 4) (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (-.f64 (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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2))))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (.f64 (pow.f64 x-scale 8) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))) (.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (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 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 x-scale 4)))) (fma.f64 1/8 (.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b 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 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.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 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 3))))) (fma.f64 1/4 (/.f64 (fma.f64 -1/4 (/.f64 (.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b 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 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))) 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 4)) (pow.f64 (/.f64 (.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b 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 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))) 2)) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 x-scale 8)))) (.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (*.f64 x-scale x-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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))))

eval6.9s (4.6%)

Compiler: Compiled 331581 to 196467 computations (40.7% saved)

prune1.2s (0.8%)

Pruning

67 alts after pruning (67 fresh and 0 done)

	Pruned	Kept	Total
New	1868	63	1931
Fresh	31	4	35
Picked	1	0	1
Done	4	0	4
Total	1904	67	1971

Accurracy

86.3%

Counts

1971 → 67

Alt Table

Click to see full alt table

Status	Accuracy	Program
	42.5%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (fma.f64 -1 (.f64 b (.f64 b (neg.f64 (+.f64 (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (.f64 x-scale (.f64 a a))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 y-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (.f64 (/.f64 y-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
	21.8%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (/.f64 (.f64 -180 (.f64 (.f64 y-scale b) b)) (.f64 angle x-scale)) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))
	46.7%	(.f64 (/.f64 180 (PI.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))))))))
	47.9%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 y-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
	47.8%	(.f64 (/.f64 180 (PI.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))))))))
	19.0%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (/.f64 (.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) -1/2) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
	6.7%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (/.f64 (.f64 180 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (PI.f64) (.f64 (-.f64 (.f64 b b) (.f64 a a)) angle))))))
	9.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 1 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))))))
	18.7%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (/.f64 (.f64 -1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (*.f64 a a)))))))
	20.7%	(.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 1 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))))))))
	18.0%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (/.f64 (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)))))) (.f64 1 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))))))
	4.4%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 (.f64 b 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 a a)))) (/.f64 (.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 x-scale x-scale))))))))
	24.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 x-scale x-scale))))))))
	17.7%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (.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 1/180 (.f64 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))))))))))
	17.7%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (.f64 -1/2 (/.f64 (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 1 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))))))))))
	18.9%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (.f64 -1/2 (/.f64 360 (/.f64 (.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 angle (.f64 x-scale x-scale))) (*.f64 b b)))))))
	41.8%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (.f64 -1/2 (/.f64 2 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))))
	20.1%	(.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))))))))))
	39.8%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (.f64 -1/2 (/.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))))))))
	18.6%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (.f64 -1/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)))))))))))
	40.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (.f64 -1/2 (.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)))))))))))
▶	49.2%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (neg.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)))))))
	29.1%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (neg.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))) y-scale)))))
	25.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))))))))))
	48.3%	(.f64 (/.f64 180 (PI.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)))))))))
	20.8%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 -180 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))
▶	49.3%	(.f64 (/.f64 180 (PI.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)))))))))
	10.8%	(.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 a a) (.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)))
	7.1%	(.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)))
	4.4%	(.f64 (atan.f64 (.f64 y-scale (.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (pow.f64 (cos.f64 (.f64 1/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 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 180 (PI.f64)))
	9.4%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 (/.f64 (.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (/.f64 y-scale angle)) (-.f64 (.f64 b b) (*.f64 a a))) (PI.f64)))) (PI.f64)))
	12.2%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 (/.f64 (.f64 -2 x-scale) y-scale) (.f64 (PI.f64) angle)))) (PI.f64)))
	9.6%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (/.f64 (.f64 (.f64 angle (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))) (PI.f64)))
	10.3%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (/.f64 (PI.f64) x-scale)) angle)))) (PI.f64)))
	11.3%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.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 (PI.f64) (+.f64 (.f64 b (neg.f64 b)) (*.f64 a a)))) (/.f64 y-scale angle)))) (PI.f64)))
	9.4%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (/.f64 (/.f64 (.f64 -2 x-scale) (*.f64 y-scale y-scale)) (PI.f64))))) (PI.f64)))
	39.1%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (*.f64 (/.f64 y-scale angle) (/.f64 (/.f64 -2 x-scale) (PI.f64))))) (PI.f64)))
	9.9%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 (/.f64 b (.f64 x-scale x-scale)) b)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))) (PI.f64)))
	11.3%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (log1p.f64 (expm1.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))) (PI.f64)))
	39.1%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (/.f64 -2 (.f64 x-scale (PI.f64)))))) (PI.f64)))
	24.5%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (-.f64 (.f64 2 (/.f64 (-.f64 (/.f64 x-scale (/.f64 (.f64 (PI.f64) (.f64 y-scale y-scale)) (.f64 a a))) (/.f64 (/.f64 (.f64 a a) x-scale) (PI.f64))) (.f64 b b))) (/.f64 2 (.f64 x-scale (PI.f64))))))) (PI.f64)))
	23.5%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (+.f64 (.f64 (-.f64 (/.f64 x-scale (.f64 (PI.f64) (.f64 (.f64 b b) (.f64 y-scale y-scale)))) (/.f64 1 (.f64 (PI.f64) (.f64 b (.f64 b x-scale))))) (.f64 (*.f64 2 a) a)) (/.f64 (/.f64 -2 x-scale) (PI.f64)))))) (PI.f64)))
	7.2%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (.f64 (/.f64 (/.f64 (.f64 2 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (/.f64 (PI.f64) x-scale)) (-.f64 (pow.f64 b 4) (pow.f64 a 4))) (+.f64 (.f64 a a) (*.f64 b b)))))) (PI.f64)))
▶	23.6%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))))) (PI.f64)))
	23.1%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (.f64 -2 (/.f64 (/.f64 b (/.f64 (.f64 x-scale (PI.f64)) b)) (-.f64 (.f64 b b) (*.f64 a a))))))) (PI.f64)))
	9.1%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (log1p.f64 (expm1.f64 (.f64 (/.f64 (.f64 x-scale 2) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (PI.f64)))))))) (PI.f64)))
	20.8%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (.f64 -2 (/.f64 y-scale x-scale)) (/.f64 (.f64 b b) (.f64 (.f64 (PI.f64) angle) (-.f64 (.f64 b b) (*.f64 a a))))))) (PI.f64)))
	3.9%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 2 (/.f64 x-scale (/.f64 (.f64 (.f64 (PI.f64) angle) (-.f64 (.f64 b b) (.f64 a a))) (.f64 a (/.f64 a y-scale))))))) (PI.f64)))
	40.1%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 (/.f64 y-scale x-scale) (.f64 (PI.f64) angle))))) (PI.f64)))
	39.1%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 y-scale (.f64 x-scale (*.f64 (PI.f64) angle)))))) (PI.f64)))
▶	12.2%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64))))))) (PI.f64)))
▶	32.0%	(.f64 180 (/.f64 (atan.f64 (.f64 1/2 (/.f64 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale (-.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)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))))))))) (PI.f64)))
	16.0%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 3) 1/3)))) (PI.f64)))
	10.1%	(.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 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)))) (pow.f64 (pow.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2) 3) 1/3))))) (PI.f64)))
	29.2%	(.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 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)))) (pow.f64 (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 3))))) (PI.f64)))
	17.9%	(.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 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 (-.f64 (exp.f64 (log1p.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))) 1) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a))))))) (PI.f64)))
	27.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 1) (-.f64 (.f64 b b) (.f64 a a))))))) (PI.f64)))
	22.1%	(.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 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)))) (expm1.f64 (log1p.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))))))) (PI.f64)))
	29.0%	(.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 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 1 2)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (.f64 b b) (.f64 a a))))))) (PI.f64)))
	27.8%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (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)))))))) (PI.f64)))
	31.0%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.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 (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))))))) (PI.f64)))
	32.4%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 1)))) (PI.f64)))
	31.0%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (.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 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90))))))))) (PI.f64)))
	30.9%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (.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 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90))))) (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)))))) (PI.f64)))
	20.8%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (.f64 360 (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))) (PI.f64)))
	47.7%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (PI.f64)))
	22.8%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (sqrt.f64 (pow.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 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90)))))) 2))))) (PI.f64)))

Compiler

Compiled 7506 to 5050 computations (32.7% saved)

localize52.0ms (0%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	99.5%	(.f64 1/180 (.f64 angle (PI.f64)))
✓	96.7%	(.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))))))
✓	59.1%	(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
✓	59.0%	(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))

Compiler

Compiled 127 to 67 computations (47.2% saved)

series33.0ms (0%)

Counts

4 → 44

Calls

18 calls:

Time	Variable		Point	Expression
1.0ms	angle	@	0	(.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))))))
1.0ms	x-scale	@	0	(.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))))))
1.0ms	y-scale	@	0	(.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))))))
1.0ms	angle	@	inf	(.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))))))
1.0ms	angle	@	-inf	(.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))))))

rewrite212.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

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

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	16	108
1	333	84
2	4401	84

Stop Event

1×	node limit

Counts

4 → 229

Calls

Call 1

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

Outputs
(((-.f64 (exp.f64 (log1p.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((.f64 1 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((.f64 (sqrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (sqrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2) (cbrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((.f64 -1 (neg.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((.f64 (neg.f64 (sqrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (neg.f64 (sqrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((.f64 (neg.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2)) (neg.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((.f64 (neg.f64 (sqrt.f64 (neg.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) (sqrt.f64 (neg.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((.f64 (neg.f64 (.f64 (cbrt.f64 (neg.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (cbrt.f64 (neg.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) (cbrt.f64 (neg.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((.f64 (neg.f64 (neg.f64 (sqrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) (sqrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((.f64 (neg.f64 (neg.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2))) (cbrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((pow.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((pow.f64 (sqrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((pow.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((pow.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) 3) 1/3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((neg.f64 (neg.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((sqrt.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((log.f64 (exp.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((cbrt.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) 3)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((expm1.f64 (log1p.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((exp.f64 (log.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((exp.f64 (.f64 (log.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 1)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((log1p.f64 (expm1.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((.f64 1 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((.f64 (sqrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (sqrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((.f64 (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (pow.f64 (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2) (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((.f64 -1 (neg.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((.f64 (neg.f64 (sqrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (neg.f64 (sqrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((.f64 (neg.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2)) (neg.f64 (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((.f64 (neg.f64 (sqrt.f64 (neg.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) (sqrt.f64 (neg.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((.f64 (neg.f64 (.f64 (cbrt.f64 (neg.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (cbrt.f64 (neg.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) (cbrt.f64 (neg.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((.f64 (neg.f64 (neg.f64 (sqrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) (sqrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((.f64 (neg.f64 (neg.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2))) (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((pow.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((pow.f64 (sqrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((pow.f64 (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((pow.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) 3) 1/3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((neg.f64 (neg.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((sqrt.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((log.f64 (exp.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((cbrt.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) 3)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((expm1.f64 (log1p.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((exp.f64 (log.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((exp.f64 (.f64 (log.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 1)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((log1p.f64 (expm1.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (/.f64 y-scale (.f64 x-scale (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 (/.f64 x-scale y-scale) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (/.f64 (.f64 (/.f64 x-scale y-scale) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 1)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (/.f64 (/.f64 x-scale y-scale) (/.f64 1 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (/.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 y-scale (.f64 (/.f64 x-scale 1) (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 y-scale (.f64 x-scale (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 y-scale (.f64 (tan.f64 (.f64 (.f64 1/180 (PI.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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 y-scale (/.f64 (.f64 (/.f64 x-scale 1) (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 1)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 y-scale (/.f64 (.f64 x-scale (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 1)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 y-scale (/.f64 (.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 y-scale (/.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 y-scale (/.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 (/.f64 1 x-scale) (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 y-scale (/.f64 (.f64 x-scale (neg.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (neg.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (/.f64 1 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 1 (.f64 (/.f64 x-scale y-scale) (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 1 (/.f64 (.f64 (/.f64 x-scale y-scale) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 1 (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (/.f64 x-scale y-scale)) (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 1 (/.f64 (.f64 (/.f64 x-scale 1) (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 1 (/.f64 (.f64 x-scale (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 1 (/.f64 (.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 1 (/.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 1 (/.f64 (/.f64 x-scale y-scale) (/.f64 1 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 1 (/.f64 (.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 1 (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (neg.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (/.f64 1 (sqrt.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (/.f64 (/.f64 x-scale y-scale) (/.f64 1 (sqrt.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (sqrt.f64 y-scale) (/.f64 (.f64 (/.f64 x-scale 1) (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (sqrt.f64 y-scale) (/.f64 (.f64 x-scale (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (sqrt.f64 y-scale) (/.f64 (.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (sqrt.f64 y-scale) (/.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (sqrt.f64 y-scale) (/.f64 x-scale (.f64 (sqrt.f64 y-scale) (/.f64 1 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (sqrt.f64 y-scale) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) x-scale) (.f64 (sqrt.f64 y-scale) (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (sqrt.f64 y-scale) (/.f64 (.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (sqrt.f64 y-scale) (.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (/.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (/.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (sqrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (/.f64 (.f64 (/.f64 x-scale y-scale) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (sqrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (sqrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (/.f64 x-scale y-scale)) (sqrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (sqrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (/.f64 (/.f64 x-scale y-scale) (.f64 (sqrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (/.f64 1 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (sqrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (neg.f64 (sqrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (sqrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (.f64 (/.f64 x-scale y-scale) (/.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (sqrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (/.f64 (/.f64 x-scale y-scale) (pow.f64 (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (pow.f64 (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) 2) (/.f64 (/.f64 x-scale y-scale) (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (cbrt.f64 y-scale) (/.f64 (.f64 (/.f64 x-scale 1) (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (cbrt.f64 y-scale) (/.f64 (.f64 x-scale (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (cbrt.f64 y-scale) (/.f64 (.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (.f64 (/.f64 x-scale 1) (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (.f64 x-scale (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 x-scale (.f64 (cbrt.f64 y-scale) (/.f64 1 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) x-scale) (.f64 (cbrt.f64 y-scale) (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (/.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (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 x-scale)) 2) (/.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (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 x-scale)) 2) (/.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (/.f64 (.f64 (/.f64 x-scale y-scale) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (pow.f64 (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (/.f64 x-scale y-scale)) (pow.f64 (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2) (/.f64 (.f64 (/.f64 x-scale y-scale) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (/.f64 x-scale y-scale)) (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2) (/.f64 (/.f64 x-scale y-scale) (.f64 (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (/.f64 1 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2) (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (neg.f64 (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2) (.f64 (/.f64 x-scale y-scale) (/.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (/.f64 y-scale x-scale)) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (/.f64 y-scale (tan.f64 (.f64 (.f64 1/180 (PI.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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (/.f64 1 x-scale) (/.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (/.f64 1 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (/.f64 (/.f64 x-scale y-scale) (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) y-scale) (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) y-scale) (/.f64 x-scale (/.f64 1 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (neg.f64 y-scale) (.f64 (neg.f64 x-scale) (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (neg.f64 y-scale) (.f64 (tan.f64 (.f64 (.f64 1/180 (PI.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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (neg.f64 y-scale) (/.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (neg.f64 y-scale) (/.f64 (.f64 (neg.f64 x-scale) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (neg.f64 y-scale) (/.f64 (neg.f64 x-scale) (/.f64 1 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (neg.f64 y-scale) (/.f64 (.f64 (neg.f64 x-scale) (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 1)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (neg.f64 y-scale) (/.f64 (.f64 (neg.f64 x-scale) (neg.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (neg.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (neg.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (.f64 (/.f64 x-scale y-scale) (neg.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (neg.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (.f64 (neg.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (neg.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (/.f64 (/.f64 x-scale y-scale) (/.f64 1 (neg.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (neg.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (/.f64 (neg.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (neg.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (/.f64 (.f64 (neg.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (neg.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (/.f64 (.f64 (neg.f64 x-scale) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (neg.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (/.f64 (.f64 (neg.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (sqrt.f64 (.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) y-scale)) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) x-scale) (sqrt.f64 (.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (sqrt.f64 (.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (/.f64 y-scale x-scale))) (/.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (sqrt.f64 (.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (sqrt.f64 (/.f64 y-scale (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (/.f64 x-scale (sqrt.f64 (/.f64 y-scale (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (sqrt.f64 (neg.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (sqrt.f64 (neg.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (sqrt.f64 (neg.f64 y-scale)) (/.f64 (.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (cbrt.f64 (.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) y-scale)) (cbrt.f64 (.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) y-scale))) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) x-scale) (cbrt.f64 (.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (cbrt.f64 (.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (/.f64 y-scale x-scale))) (cbrt.f64 (.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (/.f64 y-scale x-scale)))) (/.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (cbrt.f64 (/.f64 y-scale (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (cbrt.f64 (/.f64 y-scale (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) (/.f64 x-scale (cbrt.f64 (/.f64 y-scale (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (cbrt.f64 (neg.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (cbrt.f64 (neg.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (cbrt.f64 (neg.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (cbrt.f64 (neg.f64 y-scale)) (cbrt.f64 (neg.f64 y-scale))) (/.f64 (.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 y-scale (sqrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) x-scale) (sqrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (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 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2)) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) x-scale) (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (/.f64 y-scale x-scale) (sqrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (/.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (sqrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2)) (/.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 y-scale (/.f64 1 (sqrt.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) (/.f64 x-scale (/.f64 1 (sqrt.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 y-scale (pow.f64 (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) 2)) (/.f64 x-scale (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (/.f64 y-scale x-scale) (neg.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (neg.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (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 (.f64 1/180 (PI.f64)) angle)))) (.f64 x-scale (neg.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (neg.f64 y-scale) (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (neg.f64 y-scale) (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (.f64 (neg.f64 x-scale) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (/.f64 1 (sqrt.f64 x-scale)) (/.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (/.f64 1 (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (/.f64 y-scale 1) (.f64 (tan.f64 (.f64 (.f64 1/180 (PI.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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (/.f64 y-scale (sqrt.f64 x-scale)) (.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (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 x-scale) 2)) (.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (/.f64 1 (sqrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (/.f64 (/.f64 x-scale y-scale) (/.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (sqrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (/.f64 1 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2)) (/.f64 (/.f64 x-scale y-scale) (/.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (/.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (/.f64 (sqrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (/.f64 y-scale x-scale))) (sqrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (/.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2) (/.f64 y-scale x-scale))) (cbrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (/.f64 y-scale (.f64 (sqrt.f64 x-scale) (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (/.f64 y-scale (.f64 (pow.f64 (cbrt.f64 x-scale) 2) (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (/.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) 1) (.f64 (/.f64 x-scale y-scale) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (/.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (sqrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (.f64 (/.f64 x-scale y-scale) (sqrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (/.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2)) (.f64 (/.f64 x-scale y-scale) (cbrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 -1 (/.f64 (.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 -1 (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 -1 (.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 -1 (.f64 (/.f64 x-scale y-scale) (neg.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (neg.f64 (sqrt.f64 y-scale)) (/.f64 (.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (neg.f64 (pow.f64 (cbrt.f64 y-scale) 2)) (/.f64 (.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (neg.f64 (sqrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (sqrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (neg.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2)) (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (sqrt.f64 y-scale) (sqrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) x-scale) (.f64 (sqrt.f64 y-scale) (sqrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (sqrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (/.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (sqrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (sqrt.f64 y-scale) (/.f64 1 (sqrt.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) (/.f64 x-scale (.f64 (sqrt.f64 y-scale) (/.f64 1 (sqrt.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (/.f64 (sqrt.f64 y-scale) 1) (/.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (/.f64 (sqrt.f64 y-scale) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (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) 1) (/.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (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) (sqrt.f64 x-scale)) (/.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (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) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (/.f64 (sqrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 1) (/.f64 (/.f64 x-scale y-scale) (/.f64 (sqrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (/.f64 (sqrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2)) (/.f64 (/.f64 x-scale y-scale) (/.f64 (sqrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (cbrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2) 1) (/.f64 (/.f64 x-scale y-scale) (/.f64 (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2) (sqrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (/.f64 (/.f64 x-scale y-scale) (/.f64 (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (sqrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2)) (/.f64 (/.f64 x-scale y-scale) (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (neg.f64 y-scale) (neg.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (.f64 (neg.f64 x-scale) (neg.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (neg.f64 y-scale)) (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (neg.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (neg.f64 y-scale)) (.f64 (neg.f64 (sin.f64 (.f64 (.f64 1/180 (PI.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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (neg.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (/.f64 y-scale x-scale)) (neg.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((/.f64 (neg.f64 (/.f64 y-scale (tan.f64 (.f64 (.f64 1/180 (PI.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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((pow.f64 (/.f64 y-scale (.f64 x-scale (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((pow.f64 (sqrt.f64 (/.f64 y-scale (.f64 x-scale (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) 2) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((pow.f64 (cbrt.f64 (/.f64 y-scale (.f64 x-scale (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) 3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((pow.f64 (pow.f64 (/.f64 y-scale (.f64 x-scale (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) 3) 1/3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((sqrt.f64 (pow.f64 (/.f64 y-scale (.f64 x-scale (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((log.f64 (exp.f64 (/.f64 y-scale (.f64 x-scale (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (/.f64 y-scale (.f64 x-scale (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((cbrt.f64 (pow.f64 (/.f64 y-scale (.f64 x-scale (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) 3)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (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 x-scale) 3) (pow.f64 (/.f64 1 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 3))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((cbrt.f64 (.f64 (pow.f64 (/.f64 1 (tan.f64 (.f64 (.f64 1/180 (PI.f64)) 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>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((expm1.f64 (log1p.f64 (/.f64 y-scale (.f64 x-scale (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((exp.f64 (log.f64 (/.f64 y-scale (.f64 x-scale (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((exp.f64 (.f64 (log.f64 (/.f64 y-scale (.f64 x-scale (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) 1)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((log1p.f64 (expm1.f64 (/.f64 y-scale (.f64 x-scale (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((pow.f64 (.f64 (.f64 1/180 (PI.f64)) angle) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((pow.f64 (sqrt.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) 2) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((pow.f64 (cbrt.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) 3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((pow.f64 (pow.f64 (.f64 (.f64 1/180 (PI.f64)) angle) 3) 1/3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((sqrt.f64 (pow.f64 (.f64 (.f64 1/180 (PI.f64)) angle) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (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 (PI.f64)) angle) 1/180)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (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 1/180 (PI.f64)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((cbrt.f64 (pow.f64 (.f64 (.f64 1/180 (PI.f64)) angle) 3)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((expm1.f64 (log1p.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((exp.f64 (log.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((exp.f64 (.f64 (log.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) 1)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)) ((log1p.f64 (expm1.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/180 (.f64 angle (PI.f64)))) #f)))

simplify130.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

1540×	`associate-/r*`
1254×	`associate-r`
958×	`associate-/r/`
796×	`associate-l`
692×	`*-commutative`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	661	12743
1	1729	12529

Stop Event

1×	node limit

Counts

273 → 351

Calls

Call 1

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

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

localize28.0ms (0%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	99.8%	(.f64 y-scale (.f64 angle (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.1%	(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))

Compiler

Compiled 89 to 37 computations (58.4% saved)

series15.0ms (0%)

Counts

4 → 36

Calls

27 calls:

Time	Variable		Point	Expression
6.0ms	angle	@	-inf	(.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))
1.0ms	x-scale	@	inf	(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
1.0ms	x-scale	@	0	(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
1.0ms	angle	@	0	(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
1.0ms	angle	@	inf	(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))

rewrite134.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

1868×	`associate-*l/`
1708×	`associate-/l*`
294×	`add-sqr-sqrt`
284×	`pow1`
284×	`*-un-lft-identity`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	14	72
1	292	72
2	3731	72

Stop Event

1×	node limit

Counts

4 → 130

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 y-scale (.f64 angle (PI.f64)))

Outputs
(((-.f64 (exp.f64 (log1p.f64 (/.f64 x-scale (.f64 angle (.f64 (PI.f64) y-scale))))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((.f64 x-scale (/.f64 1 (.f64 angle (.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((.f64 (/.f64 x-scale (.f64 angle (.f64 (PI.f64) y-scale))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((.f64 1 (/.f64 x-scale (.f64 angle (.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((.f64 (sqrt.f64 x-scale) (.f64 (sqrt.f64 x-scale) (/.f64 1 (.f64 angle (.f64 (PI.f64) y-scale))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((.f64 (sqrt.f64 (/.f64 x-scale (.f64 angle (.f64 (PI.f64) y-scale)))) (sqrt.f64 (/.f64 x-scale (.f64 angle (.f64 (PI.f64) y-scale))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((.f64 (pow.f64 (cbrt.f64 x-scale) 2) (.f64 (cbrt.f64 x-scale) (/.f64 1 (.f64 angle (.f64 (PI.f64) y-scale))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (.f64 (PI.f64) y-scale)))) (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (.f64 (PI.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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((.f64 (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (.f64 (PI.f64) y-scale)))) 2) (cbrt.f64 (/.f64 x-scale (.f64 angle (.f64 (PI.f64) y-scale))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (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 y-scale (.f64 angle (PI.f64)))) #f)) ((.f64 (/.f64 1 (.f64 angle (.f64 (PI.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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((.f64 (neg.f64 x-scale) (/.f64 1 (.f64 y-scale (neg.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 y-scale (.f64 angle (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 y-scale (.f64 angle (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 y-scale (.f64 angle (PI.f64)))) #f)) ((.f64 (/.f64 1 (sqrt.f64 (.f64 angle (.f64 (PI.f64) y-scale)))) (/.f64 x-scale (sqrt.f64 (.f64 angle (.f64 (PI.f64) y-scale))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((.f64 (/.f64 1 (pow.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) y-scale))) 2)) (/.f64 x-scale (cbrt.f64 (.f64 angle (.f64 (PI.f64) y-scale))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (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 y-scale (.f64 angle (PI.f64)))) #f)) ((.f64 (/.f64 1 (.f64 y-scale (neg.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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((.f64 (/.f64 (sqrt.f64 x-scale) 1) (/.f64 (sqrt.f64 x-scale) (.f64 angle (.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (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 y-scale (.f64 angle (PI.f64)))) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) 1) (/.f64 (cbrt.f64 x-scale) (.f64 angle (.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (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 y-scale (.f64 angle (PI.f64)))) #f)) ((.f64 (/.f64 (sqrt.f64 x-scale) (.f64 angle (.f64 (PI.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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((.f64 (/.f64 (sqrt.f64 x-scale) (pow.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) y-scale))) 2)) (/.f64 (sqrt.f64 x-scale) (cbrt.f64 (.f64 angle (.f64 (PI.f64) y-scale))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (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 y-scale (.f64 angle (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 y-scale (.f64 angle (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 y-scale (.f64 angle (PI.f64)))) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (sqrt.f64 (.f64 angle (.f64 (PI.f64) y-scale)))) (/.f64 (cbrt.f64 x-scale) (sqrt.f64 (.f64 angle (.f64 (PI.f64) y-scale))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (pow.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) y-scale))) 2)) (cbrt.f64 (/.f64 x-scale (.f64 angle (.f64 (PI.f64) y-scale))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (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 y-scale (.f64 angle (PI.f64)))) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (.f64 angle (.f64 (PI.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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((.f64 (/.f64 1 (/.f64 y-scale (/.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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((pow.f64 (/.f64 x-scale (.f64 angle (.f64 (PI.f64) y-scale))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((pow.f64 (sqrt.f64 (/.f64 x-scale (.f64 angle (.f64 (PI.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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (.f64 (PI.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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((pow.f64 (pow.f64 (/.f64 x-scale (.f64 angle (.f64 (PI.f64) y-scale))) 3) 1/3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 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 y-scale (.f64 angle (PI.f64)))) #f)) ((pow.f64 (.f64 (/.f64 y-scale 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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((neg.f64 (/.f64 x-scale (.f64 y-scale (neg.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 y-scale (.f64 angle (PI.f64)))) #f)) ((sqrt.f64 (pow.f64 (/.f64 x-scale (.f64 angle (.f64 (PI.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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((log.f64 (exp.f64 (/.f64 x-scale (.f64 angle (.f64 (PI.f64) y-scale))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (/.f64 x-scale (.f64 angle (.f64 (PI.f64) y-scale)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((cbrt.f64 (pow.f64 (/.f64 x-scale (.f64 angle (.f64 (PI.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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((cbrt.f64 (/.f64 (pow.f64 x-scale 3) (pow.f64 (.f64 angle (.f64 (PI.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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((expm1.f64 (log1p.f64 (/.f64 x-scale (.f64 angle (.f64 (PI.f64) y-scale))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((exp.f64 (log.f64 (/.f64 x-scale (.f64 angle (.f64 (PI.f64) y-scale))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((exp.f64 (.f64 (log.f64 (/.f64 x-scale (.f64 angle (.f64 (PI.f64) y-scale)))) 1)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((log1p.f64 (expm1.f64 (/.f64 x-scale (.f64 angle (.f64 (PI.f64) y-scale))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (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 y-scale (.f64 angle (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 y-scale (.f64 angle (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 y-scale (.f64 angle (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 y-scale (.f64 angle (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 y-scale (.f64 angle (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 y-scale (.f64 angle (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 y-scale (.f64 angle (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 y-scale (.f64 angle (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 y-scale (.f64 angle (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 y-scale (.f64 angle (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 y-scale (.f64 angle (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 y-scale (.f64 angle (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 y-scale (.f64 angle (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 y-scale (.f64 angle (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 y-scale (.f64 angle (PI.f64)))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (/.f64 (.f64 x-scale -180) (.f64 angle (.f64 (PI.f64) y-scale))))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 90 (/.f64 (.f64 angle (.f64 (PI.f64) y-scale)) (.f64 x-scale -2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 -180 (.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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 x-scale -2) (/.f64 (.f64 angle (.f64 (PI.f64) y-scale)) 90)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 -180 x-scale) (.f64 angle (.f64 (PI.f64) y-scale))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 90 (.f64 x-scale -2)) (.f64 angle (.f64 (PI.f64) y-scale))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 -180 (neg.f64 x-scale)) (.f64 y-scale (neg.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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (.f64 x-scale -2) 90) (.f64 angle (.f64 (PI.f64) y-scale))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 x-scale -180) (.f64 angle (.f64 (PI.f64) y-scale))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (sqrt.f64 x-scale) -180) (/.f64 (.f64 angle (.f64 (PI.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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (pow.f64 (cbrt.f64 x-scale) 2) -180) (/.f64 (.f64 angle (.f64 (PI.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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (/.f64 x-scale y-scale) -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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (neg.f64 x-scale) -180) (.f64 y-scale (neg.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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (/.f64 x-scale 1) -180) (.f64 angle (.f64 (PI.f64) y-scale))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (/.f64 x-scale (.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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (/.f64 x-scale (sqrt.f64 (.f64 angle (.f64 (PI.f64) y-scale)))) -180) (sqrt.f64 (.f64 angle (.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (/.f64 x-scale (pow.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) y-scale))) 2)) -180) (cbrt.f64 (.f64 angle (.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (/.f64 x-scale (.f64 y-scale 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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (/.f64 x-scale (.f64 (PI.f64) y-scale)) -180) angle) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (sqrt.f64 (.f64 angle (PI.f64)))) -180) (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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (/.f64 x-scale (.f64 (pow.f64 (cbrt.f64 (.f64 angle (PI.f64))) 2) y-scale)) -180) (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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 180 (neg.f64 (.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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (neg.f64 (/.f64 x-scale y-scale)) -180) (neg.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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (neg.f64 (neg.f64 x-scale)) -180) (neg.f64 (.f64 y-scale (neg.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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (.f64 -2 (/.f64 x-scale y-scale)) 90) (.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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (.f64 -2 (neg.f64 x-scale)) 90) (.f64 y-scale (neg.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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (/.f64 (.f64 x-scale -2) y-scale) 90) (.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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (.f64 (neg.f64 x-scale) -2) 90) (.f64 y-scale (neg.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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (/.f64 x-scale (/.f64 (.f64 angle (PI.f64)) -2)) 90) 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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (/.f64 x-scale -1/2) 90) (.f64 angle (.f64 (PI.f64) y-scale))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (/.f64 -2 (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) y-scale))) x-scale)) 90) (sqrt.f64 (.f64 angle (.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (/.f64 -2 (/.f64 (pow.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) y-scale))) 2) x-scale)) 90) (cbrt.f64 (.f64 angle (.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (/.f64 x-scale (/.f64 (.f64 y-scale angle) -2)) 90) (PI.f64)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (neg.f64 (.f64 x-scale -2)) 90) (.f64 y-scale (neg.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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (.f64 -180 x-scale) 1) (.f64 angle (.f64 (PI.f64) y-scale))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (.f64 90 (.f64 x-scale -2)) 1) (.f64 angle (.f64 (PI.f64) y-scale))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (.f64 -180 (/.f64 x-scale 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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (.f64 -180 (neg.f64 x-scale)) 1) (.f64 y-scale (neg.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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (.f64 (.f64 x-scale -2) 90) 1) (.f64 angle (.f64 (PI.f64) y-scale))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((/.f64 (.f64 (sqrt.f64 (.f64 x-scale -2)) (.f64 (sqrt.f64 (.f64 x-scale (/.f64 -2 (.f64 angle (.f64 (PI.f64) y-scale))))) 90)) (sqrt.f64 (.f64 angle (.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((pow.f64 (/.f64 (.f64 x-scale -180) (.f64 angle (.f64 (PI.f64) y-scale))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((pow.f64 (sqrt.f64 (/.f64 (.f64 x-scale -180) (.f64 angle (.f64 (PI.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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((pow.f64 (cbrt.f64 (/.f64 (.f64 x-scale -180) (.f64 angle (.f64 (PI.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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((pow.f64 (pow.f64 (/.f64 (.f64 x-scale -180) (.f64 angle (.f64 (PI.f64) y-scale))) 3) 1/3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 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 y-scale (.f64 angle (PI.f64)))) #f)) ((sqrt.f64 (pow.f64 (/.f64 (.f64 x-scale -180) (.f64 angle (.f64 (PI.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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((log.f64 (exp.f64 (/.f64 (.f64 x-scale -180) (.f64 angle (.f64 (PI.f64) y-scale))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (/.f64 (.f64 x-scale -180) (.f64 angle (.f64 (PI.f64) y-scale)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((cbrt.f64 (pow.f64 (/.f64 (.f64 x-scale -180) (.f64 angle (.f64 (PI.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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((expm1.f64 (log1p.f64 (/.f64 (.f64 x-scale -180) (.f64 angle (.f64 (PI.f64) y-scale))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((exp.f64 (log.f64 (/.f64 (.f64 x-scale -180) (.f64 angle (.f64 (PI.f64) y-scale))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((exp.f64 (.f64 (log.f64 (/.f64 (.f64 x-scale -180) (.f64 angle (.f64 (PI.f64) y-scale)))) 1)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((log1p.f64 (expm1.f64 (/.f64 (.f64 x-scale -180) (.f64 angle (.f64 (PI.f64) y-scale))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (.f64 angle (.f64 (PI.f64) y-scale)))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((pow.f64 (.f64 angle (.f64 (PI.f64) y-scale)) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((pow.f64 (sqrt.f64 (.f64 angle (.f64 (PI.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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((pow.f64 (cbrt.f64 (.f64 angle (.f64 (PI.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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((pow.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) y-scale)) 3) 1/3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 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 y-scale (.f64 angle (PI.f64)))) #f)) ((sqrt.f64 (pow.f64 (.f64 angle (.f64 (PI.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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((log.f64 (pow.f64 (pow.f64 (exp.f64 angle) (PI.f64)) y-scale)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (.f64 angle (.f64 (PI.f64) y-scale))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((cbrt.f64 (pow.f64 (.f64 angle (.f64 (PI.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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((cbrt.f64 (.f64 (pow.f64 y-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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((cbrt.f64 (.f64 (pow.f64 (.f64 angle (PI.f64)) 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 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 y-scale (.f64 angle (PI.f64)))) #f)) ((expm1.f64 (log1p.f64 (.f64 angle (.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((exp.f64 (log.f64 (.f64 angle (.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((exp.f64 (.f64 (log.f64 (.f64 angle (.f64 (PI.f64) y-scale))) 1)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)) ((log1p.f64 (expm1.f64 (.f64 angle (.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.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 y-scale (.f64 angle (PI.f64)))) #f)))

simplify84.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

1304×	`distribute-rgt-in`
1304×	`distribute-lft-in`
1070×	`times-frac`
828×	`associate-/l*`
724×	`associate-/r*`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	329	3890
1	884	3866
2	5234	3866

Stop Event

1×	node limit

Counts

166 → 149

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

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

localize74.0ms (0%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	86.0%	(/.f64 (*.f64 y-scale y-scale) a)
✓	84.3%	(/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))
✓	80.9%	(.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))))
✓	71.6%	(.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))

Compiler

Compiled 326 to 69 computations (78.8% saved)

series47.0ms (0%)

Counts

4 → 180

Calls

45 calls:

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

rewrite129.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

624×	`add-sqr-sqrt`
616×	`pow1`
616×	`*-un-lft-identity`
578×	`add-exp-log`
578×	`add-log-exp`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	25	236
1	591	236

Stop Event

1×	node limit

Counts

4 → 131

Calls

Call 1

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

Outputs
(((/.f64 x-scale (/.f64 (PI.f64) (.f64 2 (/.f64 (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.f64 b a)) (+.f64 a b))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 2 (/.f64 (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.f64 b a)) (+.f64 a b))) (/.f64 (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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 1 (/.f64 (PI.f64) (.f64 (.f64 x-scale (/.f64 2 (+.f64 a b))) (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (/.f64 x-scale (PI.f64)) (/.f64 2 (+.f64 a b))) (/.f64 (-.f64 b a) (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (/.f64 2 (+.f64 a b)) (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (.f64 (/.f64 (PI.f64) x-scale) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (.f64 x-scale (/.f64 2 (+.f64 a b))) (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (/.f64 (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (-.f64 b a)) (.f64 (/.f64 (PI.f64) x-scale) (+.f64 a b))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (.f64 (/.f64 (PI.f64) x-scale) (.f64 (+.f64 a b) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (.f64 (/.f64 x-scale (PI.f64)) (/.f64 2 (+.f64 a b))) (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (.f64 (/.f64 x-scale (PI.f64)) (/.f64 2 (+.f64 a b))) 1) (/.f64 (-.f64 b a) (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 x-scale (.f64 (/.f64 2 (+.f64 a b)) (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)))) (.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 x-scale (/.f64 (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (-.f64 b a))) (.f64 (PI.f64) (+.f64 a b))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)))) (.f64 (PI.f64) (.f64 (+.f64 a b) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)))) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (/.f64 x-scale (PI.f64)) (/.f64 (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (-.f64 b a))) (+.f64 a b)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (/.f64 x-scale (PI.f64)) (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)))) (.f64 (+.f64 a b) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (.f64 2 (/.f64 (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.f64 b a)) (+.f64 a b))) (neg.f64 x-scale)) (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 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (.f64 (/.f64 x-scale (PI.f64)) (/.f64 2 (+.f64 a b))) (neg.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)))) (neg.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (neg.f64 x-scale) (.f64 2 (/.f64 (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.f64 b a)) (+.f64 a b)))) (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 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (.f64 (/.f64 2 (+.f64 a b)) (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (/.f64 x-scale (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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (/.f64 (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (-.f64 b a)) (/.f64 x-scale (PI.f64))) (+.f64 a b)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (/.f64 x-scale (PI.f64))) (.f64 (+.f64 a b) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (/.f64 (.f64 (.f64 x-scale (/.f64 2 (+.f64 a b))) (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.f64 b a))) 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 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (/.f64 (.f64 (.f64 x-scale (/.f64 2 (+.f64 a b))) (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.f64 b a))) (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 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (/.f64 (.f64 (.f64 x-scale (/.f64 2 (+.f64 a b))) (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.f64 b a))) (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 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (neg.f64 x-scale) (.f64 (/.f64 2 (+.f64 a b)) (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)))) (.f64 (neg.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (neg.f64 x-scale) (/.f64 (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (-.f64 b a))) (.f64 (neg.f64 (PI.f64)) (+.f64 a b))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (neg.f64 x-scale) (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)))) (.f64 (neg.f64 (PI.f64)) (.f64 (+.f64 a b) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (.f64 (/.f64 2 (+.f64 a b)) (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) x-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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (.f64 (/.f64 2 (+.f64 a b)) (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) 1) (.f64 (-.f64 b a) (/.f64 (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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (.f64 (/.f64 2 (+.f64 a b)) (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (neg.f64 x-scale)) (.f64 (-.f64 b a) (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 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (/.f64 (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (-.f64 b a)) x-scale) (.f64 (+.f64 a b) (PI.f64))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (/.f64 (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (-.f64 b a)) 1) (.f64 (+.f64 a b) (/.f64 (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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (/.f64 (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (-.f64 b a)) (neg.f64 x-scale)) (.f64 (+.f64 a b) (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 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) x-scale) (.f64 (.f64 (+.f64 a b) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) 1) (.f64 (.f64 (+.f64 a b) (-.f64 b a)) (/.f64 (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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (neg.f64 x-scale)) (.f64 (.f64 (+.f64 a b) (-.f64 b a)) (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 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((pow.f64 (/.f64 (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (.f64 (/.f64 (PI.f64) x-scale) (.f64 (+.f64 a b) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((log.f64 (exp.f64 (/.f64 (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (.f64 (/.f64 (PI.f64) x-scale) (.f64 (+.f64 a b) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((cbrt.f64 (.f64 (/.f64 (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (.f64 (/.f64 (PI.f64) x-scale) (.f64 (+.f64 a b) (-.f64 b a)))) (pow.f64 (/.f64 (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (.f64 (/.f64 (PI.f64) x-scale) (.f64 (+.f64 a b) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((expm1.f64 (log1p.f64 (/.f64 (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (.f64 (/.f64 (PI.f64) x-scale) (.f64 (+.f64 a b) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((exp.f64 (log.f64 (/.f64 (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (.f64 (/.f64 (PI.f64) x-scale) (.f64 (+.f64 a b) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((log1p.f64 (expm1.f64 (/.f64 (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (.f64 (/.f64 (PI.f64) x-scale) (.f64 (+.f64 a b) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)))
(((/.f64 y-scale (/.f64 angle (/.f64 (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (.f64 (/.f64 (PI.f64) x-scale) (.f64 (+.f64 a b) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (/.f64 (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (.f64 (/.f64 (PI.f64) x-scale) (.f64 (+.f64 a b) (-.f64 b a)))) (/.f64 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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 1 (/.f64 angle (.f64 y-scale (/.f64 (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (.f64 (/.f64 (PI.f64) x-scale) (.f64 (+.f64 a b) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 y-scale (/.f64 (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (.f64 (/.f64 (PI.f64) x-scale) (.f64 (+.f64 a b) (-.f64 b a))))) angle) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (.f64 x-scale (/.f64 2 (+.f64 a b))) (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.f64 b a))) (.f64 (/.f64 angle 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 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (/.f64 (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (.f64 (/.f64 (PI.f64) x-scale) (.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 y-scale)) (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 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (/.f64 y-scale angle) (.f64 (.f64 x-scale (/.f64 2 (+.f64 a b))) (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (.f64 (/.f64 x-scale (PI.f64)) (/.f64 y-scale angle)) (.f64 (/.f64 2 (+.f64 a b)) (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)))) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (.f64 (/.f64 x-scale (PI.f64)) (/.f64 y-scale angle)) (/.f64 (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (-.f64 b a))) (+.f64 a b)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (.f64 (/.f64 x-scale (PI.f64)) (/.f64 y-scale angle)) (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)))) (.f64 (+.f64 a b) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 y-scale (.f64 (.f64 x-scale (/.f64 2 (+.f64 a b))) (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.f64 b a)))) (.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 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (.f64 (.f64 x-scale (/.f64 2 (+.f64 a b))) (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.f64 b a))) (/.f64 y-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 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (neg.f64 y-scale) (/.f64 (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (.f64 (/.f64 (PI.f64) x-scale) (.f64 (+.f64 a b) (-.f64 b a))))) (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 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (/.f64 (.f64 y-scale (/.f64 (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (.f64 (/.f64 (PI.f64) x-scale) (.f64 (+.f64 a b) (-.f64 b a))))) 1) angle) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (/.f64 (.f64 y-scale (/.f64 (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (.f64 (/.f64 (PI.f64) x-scale) (.f64 (+.f64 a b) (-.f64 b a))))) (sqrt.f64 angle)) (sqrt.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 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (/.f64 (.f64 y-scale (/.f64 (.f64 2 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (.f64 (/.f64 (PI.f64) x-scale) (.f64 (+.f64 a b) (-.f64 b a))))) (cbrt.f64 (.f64 angle angle))) (cbrt.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 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (.f64 (.f64 x-scale (/.f64 2 (+.f64 a b))) (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.f64 b a))) y-scale) (.f64 (PI.f64) angle)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (.f64 (.f64 x-scale (/.f64 2 (+.f64 a b))) (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.f64 b a))) 1) (.f64 (PI.f64) (/.f64 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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (.f64 (.f64 x-scale (/.f64 2 (+.f64 a b))) (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.f64 b a))) (neg.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 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((/.f64 (.f64 (neg.f64 y-scale) (.f64 (.f64 x-scale (/.f64 2 (+.f64 a b))) (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.f64 b a)))) (.f64 (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 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((pow.f64 (.f64 (.f64 2 (/.f64 (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.f64 b a)) (+.f64 a b))) (.f64 (/.f64 x-scale (PI.f64)) (/.f64 y-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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((log.f64 (exp.f64 (.f64 (.f64 2 (/.f64 (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.f64 b a)) (+.f64 a b))) (.f64 (/.f64 x-scale (PI.f64)) (/.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((cbrt.f64 (.f64 (.f64 (.f64 2 (/.f64 (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.f64 b a)) (+.f64 a b))) (.f64 (/.f64 x-scale (PI.f64)) (/.f64 y-scale angle))) (pow.f64 (.f64 (.f64 2 (/.f64 (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.f64 b a)) (+.f64 a b))) (.f64 (/.f64 x-scale (PI.f64)) (/.f64 y-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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((expm1.f64 (log1p.f64 (.f64 (.f64 2 (/.f64 (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.f64 b a)) (+.f64 a b))) (.f64 (/.f64 x-scale (PI.f64)) (/.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((exp.f64 (log.f64 (.f64 (.f64 2 (/.f64 (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.f64 b a)) (+.f64 a b))) (.f64 (/.f64 x-scale (PI.f64)) (/.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((log1p.f64 (expm1.f64 (.f64 (.f64 2 (/.f64 (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.f64 b a)) (+.f64 a b))) (.f64 (/.f64 x-scale (PI.f64)) (/.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)))
(((+.f64 (/.f64 a (/.f64 (-.f64 b a) (/.f64 a (.f64 y-scale y-scale)))) (neg.f64 (/.f64 (pow.f64 (/.f64 b x-scale) 2) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((-.f64 (/.f64 a (/.f64 (-.f64 b a) (/.f64 a (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (/.f64 b x-scale) 2) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (/.f64 1 (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 1 (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (sqrt.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (.f64 (sqrt.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (/.f64 1 (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (sqrt.f64 (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.f64 b a))) (sqrt.f64 (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (cbrt.f64 (pow.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) 2)) (.f64 (cbrt.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (/.f64 1 (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (cbrt.f64 (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.f64 b a))) (cbrt.f64 (pow.f64 (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (cbrt.f64 (pow.f64 (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.f64 b a)) 2)) (cbrt.f64 (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (/.f64 1 (-.f64 b a)) (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (neg.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (/.f64 1 (neg.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (/.f64 1 (sqrt.f64 (-.f64 b a))) (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (sqrt.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (/.f64 1 (cbrt.f64 (pow.f64 (-.f64 b a) 2))) (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (cbrt.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (.f64 (+.f64 a b) (-.f64 b a))) (+.f64 a b)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.f64 (pow.f64 b 3) (pow.f64 a 3))) (+.f64 (.f64 b b) (.f64 a (+.f64 a b)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (pow.f64 (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.f64 b a)) 1/2) (pow.f64 (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (/.f64 (sqrt.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) 1) (/.f64 (sqrt.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (/.f64 (sqrt.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (sqrt.f64 (-.f64 b a))) (/.f64 (sqrt.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (sqrt.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (/.f64 (sqrt.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (cbrt.f64 (pow.f64 (-.f64 b a) 2))) (/.f64 (sqrt.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (cbrt.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) 2)) 1) (/.f64 (cbrt.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) 2)) (sqrt.f64 (-.f64 b a))) (/.f64 (cbrt.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (sqrt.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) 2)) (cbrt.f64 (pow.f64 (-.f64 b a) 2))) (/.f64 (cbrt.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2))) (cbrt.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((pow.f64 (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((neg.f64 (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (neg.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((log.f64 (exp.f64 (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((cbrt.f64 (.f64 (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.f64 b a)) (pow.f64 (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((expm1.f64 (log1p.f64 (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((exp.f64 (log.f64 (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((log1p.f64 (expm1.f64 (/.f64 (-.f64 (.f64 a (/.f64 a (.f64 y-scale y-scale))) (pow.f64 (/.f64 b x-scale) 2)) (-.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (*.f64 y-scale y-scale) a)) #f)))
(((.f64 y-scale (.f64 y-scale (/.f64 1 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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 y-scale (/.f64 1 (/.f64 a y-scale))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (.f64 y-scale y-scale) (/.f64 1 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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (.f64 (/.f64 y-scale 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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 1 (.f64 (/.f64 y-scale 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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (sqrt.f64 (.f64 (/.f64 y-scale a) y-scale)) (sqrt.f64 (.f64 (/.f64 y-scale 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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (sqrt.f64 (.f64 y-scale y-scale)) (.f64 (sqrt.f64 (.f64 y-scale y-scale)) (/.f64 1 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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (cbrt.f64 (.f64 (/.f64 y-scale a) y-scale)) (cbrt.f64 (/.f64 (pow.f64 y-scale 4) (.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (cbrt.f64 (/.f64 (pow.f64 y-scale 4) (.f64 a a))) (cbrt.f64 (.f64 (/.f64 y-scale 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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (cbrt.f64 (pow.f64 y-scale 4)) (.f64 (cbrt.f64 (.f64 y-scale y-scale)) (/.f64 1 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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (/.f64 1 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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (.f64 y-scale (neg.f64 y-scale)) (/.f64 1 (neg.f64 a))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (/.f64 1 (sqrt.f64 a)) (/.f64 (.f64 y-scale y-scale) (sqrt.f64 a))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (/.f64 1 (cbrt.f64 (.f64 a a))) (/.f64 (.f64 y-scale y-scale) (cbrt.f64 a))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (/.f64 y-scale 1) (/.f64 y-scale a)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (/.f64 y-scale 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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (/.f64 y-scale (sqrt.f64 a)) (/.f64 y-scale (sqrt.f64 a))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (pow.f64 (.f64 (/.f64 y-scale a) y-scale) 1/2) (pow.f64 (.f64 (/.f64 y-scale 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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (/.f64 y-scale (cbrt.f64 (.f64 a a))) (/.f64 y-scale (cbrt.f64 a))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (/.f64 (sqrt.f64 (.f64 y-scale y-scale)) 1) (/.f64 (sqrt.f64 (.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (/.f64 (sqrt.f64 (.f64 y-scale y-scale)) (sqrt.f64 a)) (/.f64 (sqrt.f64 (.f64 y-scale y-scale)) (sqrt.f64 a))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (/.f64 (sqrt.f64 (.f64 y-scale y-scale)) (cbrt.f64 (.f64 a a))) (/.f64 (sqrt.f64 (.f64 y-scale y-scale)) (cbrt.f64 a))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 y-scale 4)) 1) (/.f64 (cbrt.f64 (.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 y-scale 4)) (sqrt.f64 a)) (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (sqrt.f64 a))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 y-scale 4)) (cbrt.f64 (.f64 a a))) (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (cbrt.f64 a))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((pow.f64 (.f64 (/.f64 y-scale 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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((neg.f64 (/.f64 (.f64 y-scale y-scale) (neg.f64 a))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((log.f64 (exp.f64 (.f64 (/.f64 y-scale 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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((cbrt.f64 (.f64 (.f64 (/.f64 y-scale a) y-scale) (/.f64 (pow.f64 y-scale 4) (.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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((expm1.f64 (log1p.f64 (.f64 (/.f64 y-scale 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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((exp.f64 (log.f64 (.f64 (/.f64 y-scale 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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)) ((log1p.f64 (expm1.f64 (.f64 (/.f64 y-scale 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 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)))) (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a)) (/.f64 (.f64 y-scale y-scale) a)) #f)))

simplify222.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

1836×	`associate-/r*`
1494×	`associate-l`
1158×	`associate-*r/`
1022×	`associate-*l/`
616×	`associate-/r/`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	812	29429
1	2798	29241

Stop Event

1×	node limit

Counts

311 → 379

Calls

Call 1

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

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

localize55.0ms (0%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	99.4%	(.f64 (PI.f64) (.f64 1/180 angle))
✓	96.6%	(.f64 (neg.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)))))
✓	59.4%	(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
✓	58.7%	(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))

Compiler

Compiled 114 to 69 computations (39.5% saved)

series5.0ms (0%)

Counts

4 → 72

Calls

18 calls:

Time	Variable		Point	Expression
1.0ms	y-scale	@	inf	(.f64 (neg.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)))))
1.0ms	angle	@	0	(.f64 (neg.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)))))
0.0ms	angle	@	inf	(.f64 (neg.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)))))
0.0ms	angle	@	-inf	(.f64 (neg.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)))))
0.0ms	x-scale	@	-inf	(.f64 (neg.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)))))

rewrite230.0ms (0.2%)

Algorithm

1×	batch-egg-rewrite

Rules

1586×	`associate-/l*`
380×	`distribute-rgt-in`
364×	`add-sqr-sqrt`
356×	`pow1`
356×	`*-un-lft-identity`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	17	112
1	354	84
2	4682	84

Stop Event

1×	node limit

Counts

4 → 231

Calls

Call 1

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

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

simplify142.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

1470×	`associate-/r*`
1380×	`associate-/l*`
1222×	`associate-r`
704×	`associate-/r/`
684×	`*-commutative`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	647	13599
1	1752	13483

Stop Event

1×	node limit

Counts

303 → 352

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 (/.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 -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/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 (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 (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)))))
(pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1)
(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))
(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 (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 (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)))))
(pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1)
(pow.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)
(pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3)
(pow.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3) 1/3)
(sqrt.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(log.f64 (exp.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(log.f64 (+.f64 1 (expm1.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(cbrt.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3))
(expm1.f64 (log1p.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(exp.f64 (log.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(exp.f64 (.f64 (log.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 1))
(log1p.f64 (expm1.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(+.f64 0 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)))
(+.f64 (-.f64 0 (exp.f64 (log1p.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))))) 1)
(+.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 0) (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)))
(+.f64 (.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) -1) 0) (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)))
(+.f64 (.f64 0 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)))
(+.f64 (.f64 0 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) -1)) (.f64 (/.f64 y-scale x-scale) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) -1)))
(-.f64 0 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)))
(-.f64 (exp.f64 (log1p.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)))) 1)
(/.f64 (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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (/.f64 x-scale y-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 1))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (/.f64 x-scale y-scale) (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale)))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 y-scale x-scale)))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (neg.f64 y-scale)))
(/.f64 y-scale (.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 y-scale (.f64 (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 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 1 x-scale)))
(/.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 (/.f64 1 x-scale))))
(/.f64 y-scale (/.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.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 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) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (neg.f64 (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 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -1))
(/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale y-scale))
(/.f64 1 (/.f64 1 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))))
(/.f64 1 (.f64 (/.f64 x-scale y-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 1 (/.f64 (.f64 (/.f64 x-scale y-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.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 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale)))
(/.f64 1 (/.f64 (/.f64 x-scale y-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 1 (/.f64 (neg.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 1 (/.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (neg.f64 y-scale)))
(/.f64 1 (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 1 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(/.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 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (*.f64 (sqrt.f64 y-scale) (/.f64 1 x-scale))))
(/.f64 (sqrt.f64 y-scale) (/.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (neg.f64 (sqrt.f64 y-scale))))
(/.f64 (sqrt.f64 y-scale) (.f64 (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 (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 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 (sqrt.f64 (/.f64 y-scale x-scale)))))
(/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (/.f64 x-scale y-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (/.f64 x-scale y-scale) (.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 1 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 (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 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (/.f64 x-scale y-scale) (/.f64 1 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (/.f64 (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 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 (cbrt.f64 (/.f64 y-scale x-scale)))))
(/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (cos.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)))) (cbrt.f64 (.f64 y-scale y-scale))))
(/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 y-scale)))
(/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cbrt.f64 y-scale) (/.f64 1 x-scale))))
(/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (/.f64 (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (neg.f64 (cbrt.f64 y-scale))))
(/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (.f64 (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 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2)))
(/.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (/.f64 x-scale y-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2)))
(/.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (/.f64 (.f64 (/.f64 x-scale y-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.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) (/.f64 (/.f64 x-scale y-scale) (.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 1 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (cbrt.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) (.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 1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (/.f64 x-scale y-scale) (pow.f64 (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2)))
(/.f64 (pow.f64 (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2) (/.f64 (/.f64 x-scale y-scale) (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale)) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale)) (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (neg.f64 y-scale) (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(/.f64 (neg.f64 y-scale) (/.f64 (.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 1))
(/.f64 (neg.f64 y-scale) (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 1 x-scale)))
(/.f64 (neg.f64 y-scale) (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 1 (neg.f64 x-scale))))
(/.f64 (neg.f64 y-scale) (/.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (neg.f64 y-scale) (/.f64 (.f64 (neg.f64 x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (neg.f64 y-scale) (/.f64 x-scale (/.f64 1 (tan.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 (neg.f64 x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 1))
(/.f64 (neg.f64 y-scale) (/.f64 (.f64 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 (neg.f64 y-scale) (/.f64 (.f64 (neg.f64 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 (neg.f64 y-scale) (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (neg.f64 x-scale)))
(/.f64 -1 (/.f64 1 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))))
(/.f64 -1 (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale)))
(/.f64 -1 (/.f64 (neg.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 -1 (/.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) y-scale))
(/.f64 -1 (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 -1 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(/.f64 -1 (.f64 (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 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (/.f64 1 x-scale) (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale))
(/.f64 (/.f64 1 (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 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 x-scale y-scale) (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (/.f64 x-scale y-scale) (/.f64 1 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 y-scale x-scale)))
(/.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale) (neg.f64 y-scale)))
(/.f64 (sqrt.f64 (.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))) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale)))))
(/.f64 (sqrt.f64 (.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)))) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale)))))
(/.f64 (sqrt.f64 (neg.f64 y-scale)) (/.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sqrt.f64 (neg.f64 y-scale))))
(/.f64 (sqrt.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sqrt.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 (.f64 (cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale))) (cbrt.f64 (.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))) (cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale)))))
(/.f64 (.f64 (cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale))) (cbrt.f64 (.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)))) (cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale)))))
(/.f64 (.f64 (cbrt.f64 (neg.f64 y-scale)) (cbrt.f64 (neg.f64 y-scale))) (/.f64 (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (cbrt.f64 (neg.f64 y-scale))))
(/.f64 (.f64 (cbrt.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (.f64 -1 (sqrt.f64 (/.f64 y-scale x-scale))) (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (sqrt.f64 (/.f64 y-scale x-scale))))
(/.f64 (.f64 -1 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2)) (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (cbrt.f64 (/.f64 y-scale x-scale))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (.f64 -1 (neg.f64 y-scale)) (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 x-scale)))
(/.f64 (.f64 (/.f64 y-scale 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 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 y-scale)) x-scale)
(/.f64 (.f64 (neg.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 y-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))
(/.f64 (.f64 (neg.f64 y-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))
(/.f64 (.f64 (neg.f64 y-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (neg.f64 x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (neg.f64 y-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) x-scale)
(/.f64 (.f64 (neg.f64 y-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (neg.f64 x-scale))
(/.f64 (.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 y-scale x-scale)) (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) x-scale)
(/.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (/.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) (/.f64 y-scale x-scale))) (cbrt.f64 (sin.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 y-scale (sqrt.f64 x-scale)) (.f64 (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 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (cbrt.f64 x-scale)))
(/.f64 (/.f64 (neg.f64 y-scale) 1) (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(/.f64 (/.f64 (neg.f64 y-scale) (sqrt.f64 x-scale)) (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (sqrt.f64 x-scale)))
(/.f64 (/.f64 (neg.f64 y-scale) (pow.f64 (cbrt.f64 x-scale) 2)) (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (cbrt.f64 x-scale)))
(/.f64 (/.f64 1 (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 1 (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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1) (.f64 (/.f64 x-scale y-scale) (sin.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 x-scale y-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 x-scale y-scale) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (/.f64 1 (sqrt.f64 x-scale)) (/.f64 (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 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale (cbrt.f64 x-scale))))
(/.f64 (neg.f64 (sqrt.f64 y-scale)) (/.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sqrt.f64 y-scale)))
(/.f64 (neg.f64 (cbrt.f64 (.f64 y-scale y-scale))) (/.f64 (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (cbrt.f64 y-scale)))
(/.f64 (neg.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (neg.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.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 y-scale x-scale))) (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (/.f64 y-scale x-scale))))
(/.f64 (neg.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2)) (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cbrt.f64 (/.f64 y-scale x-scale))))
(/.f64 (neg.f64 (neg.f64 y-scale)) (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (neg.f64 x-scale)))
(/.f64 (neg.f64 (neg.f64 y-scale)) (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (neg.f64 (neg.f64 x-scale))))
(/.f64 (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (-.f64 0 (pow.f64 (/.f64 y-scale x-scale) 2)) (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale)))
(/.f64 (-.f64 0 (pow.f64 (/.f64 y-scale x-scale) 3)) (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (+.f64 (pow.f64 (/.f64 y-scale x-scale) 2) 0)))
(/.f64 (/.f64 (sqrt.f64 y-scale) 1) (/.f64 (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 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (sqrt.f64 y-scale) (cbrt.f64 x-scale))))
(/.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) 1) (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 (cbrt.f64 y-scale) x-scale)))
(/.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (sqrt.f64 x-scale)) (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 (cbrt.f64 y-scale) (sqrt.f64 x-scale))))
(/.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (cbrt.f64 (/.f64 y-scale x-scale))))
(/.f64 (/.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 1) (/.f64 (/.f64 x-scale y-scale) (/.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (/.f64 (sqrt.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 x-scale y-scale) (/.f64 (sqrt.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) 1) (/.f64 (/.f64 x-scale y-scale) (/.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (/.f64 x-scale y-scale) (/.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (/.f64 x-scale y-scale) (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (.f64 (neg.f64 y-scale) 1) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (neg.f64 y-scale) 1) (.f64 (neg.f64 x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (neg.f64 y-scale) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 x-scale (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (.f64 (neg.f64 y-scale) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (neg.f64 x-scale) (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 y-scale)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))
(/.f64 (.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (neg.f64 y-scale)) (.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 (.f64 y-scale (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 x-scale (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (neg.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 x-scale y-scale) (neg.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(pow.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) 1)
(pow.f64 (sqrt.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))) 2)
(pow.f64 (cbrt.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))) 3)
(pow.f64 (pow.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) 3) 1/3)
(neg.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)))
(sqrt.f64 (pow.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) 2))
(log.f64 (exp.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)))))
(cbrt.f64 (pow.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) 3))
(cbrt.f64 (.f64 (pow.f64 (/.f64 y-scale x-scale) 3) (pow.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 3)))
(cbrt.f64 (.f64 (pow.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (pow.f64 (/.f64 y-scale x-scale) 3)))
(expm1.f64 (log1p.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))))
(exp.f64 (log.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))))
(exp.f64 (.f64 (log.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))) 1))
(log1p.f64 (expm1.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))))
(-.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 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 1/180 angle))
(.f64 angle (.f64 1/180 (PI.f64)))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (.f64 1/180 (.f64 angle (PI.f64))))
(fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)) (.f64 (PI.f64) (*.f64 1/180 angle)))
(fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)) (.f64 angle (*.f64 1/180 (PI.f64))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)))))
(fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)) (fma.f64 1/180 (.f64 angle (PI.f64)) (.f64 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)))))
(+.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))))))
(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))))
(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))))
(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))))
(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))))
(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))))
(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))))
(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))))
(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))))
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 (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 angle 4) (pow.f64 (PI.f64) 4)) (.f64 -1/64800 (.f64 (.f64 angle angle) (pow.f64 (PI.f64) 2)))))
(+.f64 1 (fma.f64 1/25194240000 (.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4)) (.f64 (pow.f64 (PI.f64) 2) (.f64 -1/64800 (.f64 angle angle)))))
(+.f64 (.f64 -1/24488801280000000 (.f64 (pow.f64 angle 6) (pow.f64 (PI.f64) 6))) (+.f64 1 (+.f64 (.f64 1/25194240000 (.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))))
(fma.f64 -1/24488801280000000 (.f64 (pow.f64 angle 6) (pow.f64 (PI.f64) 6)) (+.f64 1 (fma.f64 1/25194240000 (.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4)) (.f64 -1/64800 (.f64 (*.f64 angle angle) (pow.f64 (PI.f64) 2))))))
(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 (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 1/180 angle)))
(cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-scale)) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -180 (/.f64 y-scale (.f64 x-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 y-scale (.f64 (*.f64 angle (PI.f64)) x-scale)))
(/.f64 -180 (/.f64 (.f64 (.f64 x-scale (PI.f64)) angle) y-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 -180 (/.f64 y-scale (.f64 (*.f64 angle (PI.f64)) x-scale))))
(-.f64 (/.f64 -180 (/.f64 (.f64 (.f64 x-scale (PI.f64)) angle) y-scale)) (.f64 (.f64 (/.f64 y-scale x-scale) (PI.f64)) (*.f64 -1/540 angle)))
(+.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 angle (PI.f64)) x-scale)) (neg.f64 (.f64 (pow.f64 angle 3) (-.f64 (.f64 1/139968000 (/.f64 (.f64 (pow.f64 (PI.f64) 3) y-scale) x-scale)) (fma.f64 1/699840000 (/.f64 (.f64 (pow.f64 (PI.f64) 3) y-scale) x-scale) (.f64 -1/194400 (.f64 (pow.f64 (PI.f64) 2) (*.f64 (/.f64 y-scale (/.f64 x-scale (PI.f64))) -1/540)))))))))
(-.f64 (-.f64 (/.f64 -180 (/.f64 (.f64 (.f64 x-scale (PI.f64)) angle) y-scale)) (.f64 (.f64 (/.f64 y-scale x-scale) (PI.f64)) (.f64 -1/540 angle))) (.f64 (pow.f64 angle 3) (+.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) 1/174960000) (.f64 1/194400 (.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 (/.f64 y-scale x-scale) (PI.f64)) -1/540))))))
(+.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 (pow.f64 (PI.f64) 4) (.f64 (/.f64 y-scale (/.f64 x-scale (PI.f64))) -1/540)) (fma.f64 -1/194400 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 1/139968000 (/.f64 (.f64 (pow.f64 (PI.f64) 3) y-scale) x-scale)) (fma.f64 1/699840000 (/.f64 (.f64 (pow.f64 (PI.f64) 3) y-scale) x-scale) (.f64 -1/194400 (.f64 (pow.f64 (PI.f64) 2) (.f64 (/.f64 y-scale (/.f64 x-scale (PI.f64))) -1/540)))))) (.f64 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 5))) -1/952342272000000))))) (fma.f64 -180 (/.f64 y-scale (.f64 (.f64 angle (PI.f64)) x-scale)) (neg.f64 (.f64 (pow.f64 angle 3) (-.f64 (.f64 1/139968000 (/.f64 (.f64 (pow.f64 (PI.f64) 3) y-scale) x-scale)) (fma.f64 1/699840000 (/.f64 (.f64 (pow.f64 (PI.f64) 3) y-scale) x-scale) (.f64 -1/194400 (.f64 (pow.f64 (PI.f64) 2) (*.f64 (/.f64 y-scale (/.f64 x-scale (PI.f64))) -1/540))))))))))
(-.f64 (-.f64 (-.f64 (/.f64 -180 (/.f64 (.f64 (.f64 x-scale (PI.f64)) angle) y-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 (pow.f64 (PI.f64) 2) (.f64 (.f64 (/.f64 y-scale x-scale) (PI.f64)) -1/540)))))) (.f64 (pow.f64 angle 5) (-.f64 (/.f64 (.f64 (.f64 -1/136048896000000 y-scale) (pow.f64 (PI.f64) 5)) x-scale) (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 (pow.f64 (PI.f64) 2) (.f64 (.f64 (/.f64 y-scale x-scale) (PI.f64)) -1/540))))) (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 5)) -1/952342272000000)))))) (.f64 (.f64 (/.f64 y-scale x-scale) (PI.f64)) (*.f64 -1/540 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)))))))
(.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-scale)) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 1/180 angle))
(.f64 angle (.f64 1/180 (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 1/180 angle))
(.f64 angle (.f64 1/180 (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 1/180 angle))
(.f64 angle (.f64 1/180 (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 1/180 angle))
(.f64 angle (.f64 1/180 (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 1/180 angle))
(.f64 angle (.f64 1/180 (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 1/180 angle))
(.f64 angle (.f64 1/180 (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 1/180 angle))
(.f64 angle (.f64 1/180 (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 1/180 angle))
(.f64 angle (.f64 1/180 (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 1/180 angle))
(.f64 angle (.f64 1/180 (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 1/180 angle))
(.f64 angle (.f64 1/180 (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 1/180 angle))
(.f64 angle (.f64 1/180 (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 1/180 angle))
(.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 (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 (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 (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))))
(pow.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))))
(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 angle (.f64 1/180 (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 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64))))
(sqrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(sqrt.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))
(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))))
(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))))
(-.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 angle (.f64 1/180 (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 angle (.f64 1/180 (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 angle (.f64 1/180 (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 angle (.f64 1/180 (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 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64))))
(pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1)
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(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 angle (.f64 1/180 (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 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64))))
(sqrt.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(sqrt.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))
(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 angle (.f64 1/180 (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 angle (.f64 1/180 (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 angle (.f64 1/180 (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 angle (.f64 1/180 (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 angle (.f64 1/180 (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 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64))))
(+.f64 0 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 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 angle (.f64 1/180 (PI.f64)))))
(+.f64 (-.f64 0 (exp.f64 (log1p.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))))) 1)
(/.f64 (neg.f64 y-scale) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 y-scale (.f64 (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (neg.f64 x-scale)))
(+.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 0) (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 angle (.f64 1/180 (PI.f64)))))
(+.f64 (.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) -1) 0) (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 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 angle (.f64 1/180 (PI.f64)))))
(+.f64 (.f64 0 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 angle (.f64 1/180 (PI.f64)))))
(+.f64 (.f64 0 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) -1)) (.f64 (/.f64 y-scale x-scale) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) -1)))
(/.f64 (neg.f64 y-scale) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 y-scale (.f64 (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (neg.f64 x-scale)))
(-.f64 0 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)))
(/.f64 (neg.f64 y-scale) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 y-scale (.f64 (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (neg.f64 x-scale)))
(-.f64 (exp.f64 (log1p.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)))) 1)
(/.f64 y-scale (.f64 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 (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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (/.f64 x-scale y-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 1))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (/.f64 x-scale y-scale) (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale)))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 y-scale x-scale)))
(.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-scale)) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (neg.f64 y-scale)))
(.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-scale)) (sin.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 angle (.f64 1/180 (PI.f64)))))
(/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 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 angle (.f64 1/180 (PI.f64)))))
(/.f64 y-scale (/.f64 (.f64 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 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))))
(/.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 1 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 angle (.f64 1/180 (PI.f64)))))
(/.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 (/.f64 1 x-scale))))
(/.f64 (neg.f64 y-scale) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 y-scale (.f64 (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (neg.f64 x-scale)))
(/.f64 y-scale (/.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 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.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 y-scale (.f64 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 (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 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(/.f64 y-scale (.f64 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 (neg.f64 (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))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-scale)) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -1))
(/.f64 (neg.f64 y-scale) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 y-scale (.f64 (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (neg.f64 x-scale)))
(/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale y-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 angle (.f64 1/180 (PI.f64)))))
(/.f64 1 (/.f64 1 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 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 angle (.f64 1/180 (PI.f64)))))
(/.f64 1 (.f64 (/.f64 x-scale y-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 y-scale (.f64 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 (/.f64 x-scale y-scale) (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))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 1 (/.f64 (.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-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 angle (.f64 1/180 (PI.f64)))))
(/.f64 1 (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale 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 angle (.f64 1/180 (PI.f64)))))
(/.f64 1 (/.f64 (/.f64 x-scale y-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 y-scale (.f64 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 (neg.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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-scale)) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 1 (/.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (neg.f64 y-scale)))
(/.f64 (neg.f64 y-scale) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 y-scale (.f64 (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (neg.f64 x-scale)))
(/.f64 1 (/.f64 (.f64 (/.f64 x-scale y-scale) (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 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 1 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-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 angle (.f64 1/180 (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) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (sqrt.f64 y-scale) x-scale))
(.f64 (sqrt.f64 y-scale) (/.f64 (/.f64 (sqrt.f64 y-scale) x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (sqrt.f64 y-scale) (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (*.f64 (sqrt.f64 y-scale) (/.f64 1 x-scale))))
(.f64 (/.f64 (sqrt.f64 y-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (sqrt.f64 y-scale) x-scale))
(.f64 (sqrt.f64 y-scale) (/.f64 (/.f64 (sqrt.f64 y-scale) x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (sqrt.f64 y-scale) (/.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (neg.f64 (sqrt.f64 y-scale))))
(.f64 (/.f64 (sqrt.f64 y-scale) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (sqrt.f64 y-scale)))
(.f64 (sqrt.f64 y-scale) (/.f64 (/.f64 (neg.f64 (sqrt.f64 y-scale)) x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (sqrt.f64 y-scale) (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale (sqrt.f64 y-scale))))
(.f64 (/.f64 (sqrt.f64 y-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (sqrt.f64 y-scale) x-scale))
(.f64 (sqrt.f64 y-scale) (/.f64 (/.f64 (sqrt.f64 y-scale) x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (/.f64 (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)) (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)) (sqrt.f64 (/.f64 y-scale x-scale))) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 (sqrt.f64 (/.f64 y-scale x-scale)))))
(.f64 (/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 (sqrt.f64 (/.f64 y-scale x-scale))))
(/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (/.f64 (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (neg.f64 (sqrt.f64 (/.f64 y-scale x-scale)))))
(/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (/.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (/.f64 y-scale x-scale))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sqrt.f64 (/.f64 y-scale x-scale))) (/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (/.f64 y-scale x-scale))))
(.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sqrt.f64 (/.f64 y-scale x-scale))) (/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (neg.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (/.f64 x-scale y-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 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (/.f64 x-scale y-scale) (.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 1 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (/.f64 1 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (/.f64 x-scale y-scale) (/.f64 1 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(.f64 (/.f64 (/.f64 1 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 x-scale y-scale)) (/.f64 1 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (/.f64 1 (sqrt.f64 (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.f64 (/.f64 x-scale y-scale) (sqrt.f64 (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cbrt.f64 (/.f64 y-scale x-scale))))
(.f64 (/.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 (cbrt.f64 (/.f64 y-scale x-scale)) (/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 (cbrt.f64 (/.f64 y-scale x-scale)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 (cbrt.f64 (/.f64 y-scale x-scale))))
(/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (/.f64 (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (neg.f64 (cbrt.f64 (/.f64 y-scale x-scale)))))
(/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cbrt.f64 (/.f64 y-scale x-scale))))
(.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cbrt.f64 (/.f64 y-scale x-scale))) (/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cbrt.f64 (/.f64 y-scale x-scale))))
(.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cbrt.f64 (/.f64 y-scale x-scale))) (/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (neg.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (cbrt.f64 y-scale) (/.f64 (.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (.f64 y-scale y-scale))))
(.f64 (/.f64 (cbrt.f64 y-scale) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (*.f64 y-scale y-scale)))
(.f64 (cbrt.f64 y-scale) (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (.f64 x-scale (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 y-scale)))
(.f64 (/.f64 (cbrt.f64 y-scale) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (*.f64 y-scale y-scale)))
(.f64 (cbrt.f64 y-scale) (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (.f64 x-scale (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cbrt.f64 y-scale) (/.f64 1 x-scale))))
(.f64 (/.f64 (cbrt.f64 y-scale) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (*.f64 y-scale y-scale)))
(.f64 (cbrt.f64 y-scale) (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (.f64 x-scale (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (/.f64 (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (neg.f64 (cbrt.f64 y-scale))))
(.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (neg.f64 (cbrt.f64 y-scale)))
(.f64 (cbrt.f64 y-scale) (/.f64 (/.f64 (neg.f64 (cbrt.f64 (.f64 y-scale y-scale))) x-scale) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (cbrt.f64 y-scale))))
(.f64 (/.f64 (cbrt.f64 y-scale) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (*.f64 y-scale y-scale)))
(.f64 (cbrt.f64 y-scale) (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (.f64 x-scale (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(/.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2)))
(.f64 (/.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 (cbrt.f64 (/.f64 y-scale x-scale)) (/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (/.f64 x-scale y-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 (cbrt.f64 (cos.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 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (/.f64 (.f64 (/.f64 x-scale y-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 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (/.f64 (/.f64 x-scale y-scale) (.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 1 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (/.f64 x-scale y-scale) (pow.f64 (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2)))
(.f64 (/.f64 (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 x-scale y-scale)) (pow.f64 (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 2))
(/.f64 (pow.f64 (/.f64 1 (cbrt.f64 (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) 2) (.f64 (/.f64 x-scale y-scale) (cbrt.f64 (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(/.f64 (pow.f64 (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2) (/.f64 (/.f64 x-scale y-scale) (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(.f64 (/.f64 (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 x-scale y-scale)) (pow.f64 (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 2))
(/.f64 (pow.f64 (/.f64 1 (cbrt.f64 (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) 2) (.f64 (/.f64 x-scale y-scale) (cbrt.f64 (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale)) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale)) (neg.f64 (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 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-scale)) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (neg.f64 y-scale) (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(/.f64 (neg.f64 y-scale) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 y-scale (.f64 (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (neg.f64 x-scale)))
(/.f64 (neg.f64 y-scale) (/.f64 (.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 1))
(/.f64 (neg.f64 y-scale) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 y-scale (.f64 (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (neg.f64 x-scale)))
(/.f64 (neg.f64 y-scale) (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 1 x-scale)))
(/.f64 (neg.f64 y-scale) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 y-scale (.f64 (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (neg.f64 x-scale)))
(/.f64 (neg.f64 y-scale) (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 1 (neg.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 angle (.f64 1/180 (PI.f64)))))
(/.f64 (neg.f64 y-scale) (/.f64 (.f64 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))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-scale)) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (neg.f64 y-scale) (/.f64 (.f64 (neg.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 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (neg.f64 y-scale) (/.f64 x-scale (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (neg.f64 y-scale) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 y-scale (.f64 (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (neg.f64 x-scale)))
(/.f64 (neg.f64 y-scale) (/.f64 (neg.f64 x-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 y-scale (.f64 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 (neg.f64 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 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))))
(/.f64 (neg.f64 y-scale) (/.f64 (.f64 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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-scale)) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (neg.f64 y-scale) (/.f64 (.f64 (neg.f64 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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (neg.f64 y-scale) (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (neg.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 angle (.f64 1/180 (PI.f64)))))
(/.f64 -1 (/.f64 1 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))))
(/.f64 (neg.f64 y-scale) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 y-scale (.f64 (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (neg.f64 x-scale)))
(/.f64 -1 (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale)))
(/.f64 (neg.f64 y-scale) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 y-scale (.f64 (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (neg.f64 x-scale)))
(/.f64 -1 (/.f64 (neg.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 -1 (/.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) y-scale))
(/.f64 (neg.f64 y-scale) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 y-scale (.f64 (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (neg.f64 x-scale)))
(/.f64 -1 (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.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))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 -1 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(/.f64 (neg.f64 y-scale) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 y-scale (.f64 (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (neg.f64 x-scale)))
(/.f64 -1 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (neg.f64 (/.f64 x-scale y-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 angle (.f64 1/180 (PI.f64)))))
(/.f64 -1 (.f64 (/.f64 x-scale y-scale) (neg.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 y-scale (.f64 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 1 x-scale) (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-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 angle (.f64 1/180 (PI.f64)))))
(/.f64 (/.f64 1 (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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 x-scale y-scale) (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (/.f64 x-scale y-scale) (/.f64 1 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 y-scale x-scale)))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale) (neg.f64 y-scale)))
(.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.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))) (/.f64 y-scale x-scale))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale)))))
(.f64 (sqrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale x-scale))) (/.f64 (sqrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale x-scale))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (sqrt.f64 (.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)))) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale)))))
(.f64 (/.f64 (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale))) (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))))
(.f64 (sqrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale x-scale))) (/.f64 (sqrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale x-scale))) (neg.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(/.f64 (sqrt.f64 (neg.f64 y-scale)) (/.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sqrt.f64 (neg.f64 y-scale))))
(/.f64 (sqrt.f64 (neg.f64 y-scale)) (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (sqrt.f64 (neg.f64 y-scale)) x-scale)))
(.f64 (/.f64 (sqrt.f64 (neg.f64 y-scale)) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 (sqrt.f64 (neg.f64 y-scale)) x-scale))
(/.f64 (sqrt.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sqrt.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 (sqrt.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 x-scale)) y-scale) (sqrt.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (sqrt.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.f64 (/.f64 (sqrt.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (neg.f64 x-scale))) y-scale))
(/.f64 (.f64 (cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale))) (cbrt.f64 (.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))) (cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale)))))
(.f64 (/.f64 (.f64 (cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale))) (cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))))
(.f64 (cbrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale x-scale))) (/.f64 (cbrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale x-scale))) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cbrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale x-scale))))))
(/.f64 (.f64 (cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale))) (cbrt.f64 (.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)))) (cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale)))))
(.f64 (cbrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale x-scale))) (/.f64 (cbrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale x-scale))) (/.f64 (neg.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (cbrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale x-scale))))))
(/.f64 (.f64 (cbrt.f64 (neg.f64 y-scale)) (cbrt.f64 (neg.f64 y-scale))) (/.f64 (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (cbrt.f64 (neg.f64 y-scale))))
(.f64 (/.f64 (.f64 (cbrt.f64 (neg.f64 y-scale)) (cbrt.f64 (neg.f64 y-scale))) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (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))) x-scale) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(/.f64 (.f64 (cbrt.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(.f64 (/.f64 (.f64 (cbrt.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 x-scale)) y-scale)) (cbrt.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (.f64 (cbrt.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (cbrt.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (/.f64 x-scale y-scale)) (/.f64 (cbrt.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (neg.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (.f64 -1 (sqrt.f64 (/.f64 y-scale x-scale))) (/.f64 (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)) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 (sqrt.f64 (/.f64 y-scale x-scale))))
(/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (/.f64 (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (neg.f64 (sqrt.f64 (/.f64 y-scale x-scale)))))
(/.f64 (.f64 -1 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2)) (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (cbrt.f64 (/.f64 y-scale x-scale))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 (cbrt.f64 (/.f64 y-scale x-scale))))
(/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (/.f64 (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (neg.f64 (cbrt.f64 (/.f64 y-scale x-scale)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (cos.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 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-scale)) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (cos.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 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-scale)) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 -1 (neg.f64 y-scale)) (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 x-scale)))
(/.f64 (neg.f64 y-scale) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 y-scale (.f64 (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (neg.f64 x-scale)))
(/.f64 (.f64 (/.f64 y-scale 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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 y-scale)) x-scale)
(/.f64 (neg.f64 y-scale) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 y-scale (.f64 (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (neg.f64 x-scale)))
(/.f64 (.f64 (neg.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-scale)) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 (neg.f64 y-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))
(.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-scale)) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 (neg.f64 y-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (.f64 (neg.f64 y-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (neg.f64 x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (.f64 (neg.f64 y-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) x-scale)
(/.f64 (neg.f64 y-scale) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 y-scale (.f64 (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (neg.f64 x-scale)))
(/.f64 (.f64 (neg.f64 y-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (neg.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 angle (.f64 1/180 (PI.f64)))))
(/.f64 (.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 y-scale x-scale)) (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (.f64 y-scale (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 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 angle (.f64 1/180 (PI.f64)))))
(/.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (/.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) (/.f64 y-scale x-scale))) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (/.f64 y-scale 1) (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 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 angle (.f64 1/180 (PI.f64)))))
(/.f64 (/.f64 y-scale (sqrt.f64 x-scale)) (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (sqrt.f64 x-scale)))
(/.f64 (/.f64 (/.f64 y-scale (sqrt.f64 x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (sqrt.f64 x-scale))
(/.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 x-scale) 2)) (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (cbrt.f64 x-scale)))
(/.f64 y-scale (.f64 (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cbrt.f64 x-scale)) (pow.f64 (cbrt.f64 x-scale) 2)))
(/.f64 y-scale (.f64 (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (cbrt.f64 x-scale) (pow.f64 (cbrt.f64 x-scale) 2))))
(/.f64 (/.f64 (neg.f64 y-scale) 1) (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(/.f64 (neg.f64 y-scale) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 y-scale (.f64 (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (neg.f64 x-scale)))
(/.f64 (/.f64 (neg.f64 y-scale) (sqrt.f64 x-scale)) (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (sqrt.f64 x-scale)))
(/.f64 (/.f64 (/.f64 (neg.f64 y-scale) (sqrt.f64 x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (sqrt.f64 x-scale))
(/.f64 (/.f64 (neg.f64 y-scale) (pow.f64 (cbrt.f64 x-scale) 2)) (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (cbrt.f64 x-scale)))
(/.f64 (neg.f64 y-scale) (.f64 (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cbrt.f64 x-scale)) (pow.f64 (cbrt.f64 x-scale) 2)))
(/.f64 (neg.f64 y-scale) (.f64 (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (cbrt.f64 x-scale) (pow.f64 (cbrt.f64 x-scale) 2))))
(/.f64 (/.f64 1 (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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (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 (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1) (.f64 (/.f64 x-scale y-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.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 x-scale y-scale) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (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 x-scale y-scale) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (/.f64 1 (sqrt.f64 x-scale)) (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale (sqrt.f64 x-scale))))
(.f64 (/.f64 (/.f64 1 (sqrt.f64 x-scale)) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 y-scale (sqrt.f64 x-scale)))
(.f64 (/.f64 y-scale (sqrt.f64 x-scale)) (/.f64 (/.f64 1 (sqrt.f64 x-scale)) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (/.f64 1 (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (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 y-scale (cbrt.f64 x-scale))) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(/.f64 (neg.f64 (sqrt.f64 y-scale)) (/.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sqrt.f64 y-scale)))
(.f64 (/.f64 (sqrt.f64 y-scale) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (sqrt.f64 y-scale)))
(.f64 (sqrt.f64 y-scale) (/.f64 (/.f64 (neg.f64 (sqrt.f64 y-scale)) x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (neg.f64 (cbrt.f64 (.f64 y-scale y-scale))) (/.f64 (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (cbrt.f64 y-scale)))
(.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (neg.f64 (cbrt.f64 y-scale)))
(.f64 (cbrt.f64 y-scale) (/.f64 (/.f64 (neg.f64 (cbrt.f64 (.f64 y-scale y-scale))) x-scale) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(/.f64 (neg.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (neg.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (neg.f64 (sqrt.f64 (/.f64 y-scale x-scale))) (/.f64 (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)) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 (sqrt.f64 (/.f64 y-scale x-scale))))
(/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (/.f64 (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (neg.f64 (sqrt.f64 (/.f64 y-scale x-scale)))))
(/.f64 (neg.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2)) (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cbrt.f64 (/.f64 y-scale x-scale))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 (cbrt.f64 (/.f64 y-scale x-scale))))
(/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (/.f64 (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (neg.f64 (cbrt.f64 (/.f64 y-scale x-scale)))))
(/.f64 (neg.f64 (neg.f64 y-scale)) (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (neg.f64 x-scale)))
(/.f64 (neg.f64 y-scale) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 y-scale (.f64 (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (neg.f64 x-scale)))
(/.f64 (neg.f64 (neg.f64 y-scale)) (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (neg.f64 (neg.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 angle (.f64 1/180 (PI.f64)))))
(/.f64 (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (/.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (/.f64 y-scale x-scale))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sqrt.f64 (/.f64 y-scale x-scale))) (/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(/.f64 (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(.f64 (/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (/.f64 y-scale x-scale))))
(.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sqrt.f64 (/.f64 y-scale x-scale))) (/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (neg.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (-.f64 0 (pow.f64 (/.f64 y-scale x-scale) 2)) (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale)))
(/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale)))
(/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))))
(/.f64 (-.f64 0 (pow.f64 (/.f64 y-scale x-scale) 3)) (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (+.f64 (pow.f64 (/.f64 y-scale x-scale) 2) 0)))
(/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 3)) (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (pow.f64 (/.f64 y-scale x-scale) 2)))
(/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 3)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2))
(/.f64 (/.f64 (sqrt.f64 y-scale) 1) (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (sqrt.f64 y-scale) x-scale)))
(.f64 (/.f64 (sqrt.f64 y-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (sqrt.f64 y-scale) x-scale))
(.f64 (sqrt.f64 y-scale) (/.f64 (/.f64 (sqrt.f64 y-scale) x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (/.f64 (sqrt.f64 y-scale) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (sqrt.f64 y-scale) (cbrt.f64 x-scale))))
(/.f64 (/.f64 (sqrt.f64 y-scale) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (sqrt.f64 y-scale) (cbrt.f64 x-scale))))
(/.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) 1) (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 (cbrt.f64 y-scale) x-scale)))
(.f64 (/.f64 (cbrt.f64 y-scale) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (*.f64 y-scale y-scale)))
(.f64 (cbrt.f64 y-scale) (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (.f64 x-scale (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(/.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (sqrt.f64 x-scale)) (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 (cbrt.f64 y-scale) (sqrt.f64 x-scale))))
(.f64 (/.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (sqrt.f64 x-scale)) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cbrt.f64 y-scale) (sqrt.f64 x-scale)))
(.f64 (/.f64 (cbrt.f64 y-scale) (sqrt.f64 x-scale)) (/.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (sqrt.f64 x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(/.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (cbrt.f64 (/.f64 y-scale x-scale))))
(.f64 (/.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (pow.f64 (cbrt.f64 x-scale) 2)) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (/.f64 y-scale x-scale)))
(/.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (cbrt.f64 (/.f64 y-scale x-scale))))
(/.f64 (/.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 1) (/.f64 (/.f64 x-scale y-scale) (/.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.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)))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (/.f64 x-scale y-scale) (/.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.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) 1) (/.f64 (/.f64 x-scale y-scale) (/.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.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) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (/.f64 x-scale y-scale) (/.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.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) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (/.f64 x-scale y-scale) (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (/.f64 (/.f64 x-scale y-scale) 1) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (.f64 (/.f64 x-scale y-scale) (cbrt.f64 (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))
(/.f64 (.f64 (neg.f64 y-scale) 1) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (neg.f64 y-scale) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 y-scale (.f64 (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (neg.f64 x-scale)))
(/.f64 (.f64 (neg.f64 y-scale) 1) (.f64 (neg.f64 x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 y-scale (.f64 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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 x-scale (neg.f64 (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 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-scale)) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 (neg.f64 y-scale) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (neg.f64 x-scale) (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 y-scale)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))
(.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-scale)) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (neg.f64 y-scale)) (.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale))
(.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale (neg.f64 x-scale)) (sin.f64 (.f64 angle (*.f64 1/180 (PI.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (.f64 y-scale (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 x-scale (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(/.f64 (neg.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 x-scale y-scale) (neg.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(pow.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) 1)
(/.f64 y-scale (.f64 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 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))) 2)
(pow.f64 (sqrt.f64 (/.f64 y-scale (.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) 2)
(pow.f64 (sqrt.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) 2)
(pow.f64 (cbrt.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))) 3)
(/.f64 y-scale (.f64 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 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) 3) 1/3)
(/.f64 y-scale (.f64 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 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)))
(/.f64 (neg.f64 y-scale) (.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 y-scale (.f64 (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (neg.f64 x-scale)))
(sqrt.f64 (pow.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) 2))
(sqrt.f64 (pow.f64 (/.f64 y-scale (.f64 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 angle (.f64 1/180 (PI.f64))))) 2))
(log.f64 (exp.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 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 angle (.f64 1/180 (PI.f64)))))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 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 angle (.f64 1/180 (PI.f64)))))
(cbrt.f64 (pow.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) 3))
(/.f64 y-scale (.f64 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 (/.f64 1 (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))))
(cbrt.f64 (.f64 (pow.f64 (/.f64 y-scale x-scale) 3) (pow.f64 (/.f64 1 (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) 3)))
(cbrt.f64 (.f64 (pow.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (pow.f64 (/.f64 y-scale x-scale) 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))))
(cbrt.f64 (.f64 (pow.f64 (/.f64 y-scale x-scale) 3) (pow.f64 (/.f64 1 (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) 3)))
(expm1.f64 (log1p.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 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 angle (.f64 1/180 (PI.f64)))))
(exp.f64 (log.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 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 angle (.f64 1/180 (PI.f64)))))
(exp.f64 (.f64 (log.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))) 1))
(/.f64 y-scale (.f64 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 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 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 angle (.f64 1/180 (PI.f64)))))
(-.f64 (exp.f64 (log1p.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 1)
(.f64 (PI.f64) (.f64 1/180 angle))
(.f64 angle (.f64 1/180 (PI.f64)))
(pow.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 1)
(.f64 (PI.f64) (.f64 1/180 angle))
(.f64 angle (.f64 1/180 (PI.f64)))
(pow.f64 (sqrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)
(pow.f64 (sqrt.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)
(pow.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)
(.f64 (PI.f64) (.f64 1/180 angle))
(.f64 angle (.f64 1/180 (PI.f64)))
(pow.f64 (pow.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 3) 1/3)
(.f64 (PI.f64) (.f64 1/180 angle))
(.f64 angle (.f64 1/180 (PI.f64)))
(sqrt.f64 (pow.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))
(sqrt.f64 (pow.f64 (.f64 angle (.f64 1/180 (PI.f64))) 2))
(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)))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (PI.f64) (.f64 1/180 angle))
(.f64 angle (.f64 1/180 (PI.f64)))
(cbrt.f64 (pow.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 3))
(.f64 (PI.f64) (.f64 1/180 angle))
(.f64 angle (.f64 1/180 (PI.f64)))
(cbrt.f64 (.f64 (pow.f64 (PI.f64) 3) (pow.f64 (.f64 1/180 angle) 3)))
(.f64 (PI.f64) (.f64 1/180 angle))
(.f64 angle (.f64 1/180 (PI.f64)))
(cbrt.f64 (.f64 (pow.f64 (.f64 1/180 angle) 3) (pow.f64 (PI.f64) 3)))
(.f64 (PI.f64) (.f64 1/180 angle))
(.f64 angle (.f64 1/180 (PI.f64)))
(expm1.f64 (log1p.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(.f64 (PI.f64) (.f64 1/180 angle))
(.f64 angle (.f64 1/180 (PI.f64)))
(exp.f64 (log.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(.f64 (PI.f64) (.f64 1/180 angle))
(.f64 angle (.f64 1/180 (PI.f64)))
(exp.f64 (.f64 (log.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 1))
(.f64 (PI.f64) (.f64 1/180 angle))
(.f64 angle (.f64 1/180 (PI.f64)))
(log1p.f64 (expm1.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(.f64 (PI.f64) (.f64 1/180 angle))
(.f64 angle (.f64 1/180 (PI.f64)))

localize250.0ms (0.2%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	81.5%	(-.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)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))))
	59.2%	(cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))
	58.7%	(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
✓	58.7%	(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))

Compiler

Compiled 580 to 368 computations (36.6% saved)

series3.0ms (0%)

Counts

2 → 48

Calls

12 calls:

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

rewrite164.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

526×	`add-sqr-sqrt`
516×	`*-un-lft-identity`
512×	`pow1`
486×	`add-exp-log`
486×	`add-log-exp`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	27	140
1	606	116
2	7519	116

Stop Event

1×	node limit

Counts

2 → 88

Calls

Call 1

Inputs

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

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

Outputs

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

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

simplify183.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

1620×	`associate-*r/`
688×	`associate-r`
668×	`+-commutative`
620×	`associate-l`
608×	`associate-+l+`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	334	14468
1	1053	13678
2	5083	13530

Stop Event

1×	node limit

Counts

136 → 172

Calls

Call 1

Inputs
(.f64 1/180 (.f64 angle (PI.f64)))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (.f64 1/180 (.f64 angle (PI.f64))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (+.f64 (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5))) (.f64 -1/30855889612800000000 (.f64 (pow.f64 angle 7) (pow.f64 (PI.f64) 7))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(/.f64 -1 (pow.f64 x-scale 2))
(-.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (/.f64 1 (pow.f64 x-scale 2)))
(-.f64 (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 -1 (.f64 (pow.f64 angle 4) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))))))) (/.f64 1 (pow.f64 x-scale 2)))
(-.f64 (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1 (.f64 (pow.f64 angle 6) (+.f64 (.f64 -1/816293376000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (.f64 -1/12244400640000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2)))))) (.f64 -1 (.f64 (pow.f64 angle 4) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2)))))))) (/.f64 1 (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(-.f64 (exp.f64 (log1p.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) 1)
(.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) 1)
(.f64 1 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))
(.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) 2))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) 2)))
(pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 1)
(pow.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1/2)
(pow.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2)
(pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 3)
(pow.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3) 1/3)
(sqrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))
(fabs.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))
(log.f64 (exp.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))
(log.f64 (+.f64 1 (expm1.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(cbrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))
(expm1.f64 (log1p.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))
(exp.f64 (log.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))
(exp.f64 (.f64 (log.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) 1))
(log1p.f64 (expm1.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))
(+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))
(+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (.f64 (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale)) 2)) 1))
(+.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) (fma.f64 (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) 1 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))
(+.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) (fma.f64 (neg.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale))) (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))
(+.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) (fma.f64 (neg.f64 (cbrt.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2))) (pow.f64 (cbrt.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))
(+.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2)) (neg.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2)))
(+.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2)) (.f64 (neg.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) 2)) (pow.f64 y-scale -2)))
(+.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2)) (.f64 -1 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale) 2)))
(+.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2)) (.f64 (neg.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale)))
(+.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2)) (.f64 (neg.f64 (cbrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)))) (cbrt.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale) 2))))
(+.f64 (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2))
(+.f64 (.f64 (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) 1) (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale) 2))
(+.f64 (neg.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2)) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2)))
(+.f64 (.f64 (neg.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (pow.f64 y-scale -2)) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) x-scale) 2)))
(+.f64 (.f64 -1 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2)) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) x-scale) 2)))
(+.f64 (.f64 (neg.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) x-scale) 2)))
(+.f64 (.f64 (neg.f64 (cbrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)))) (cbrt.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2))) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) x-scale) 2)))
(+.f64 (fma.f64 (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) 1 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))
(+.f64 (fma.f64 (neg.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale))) (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))
(+.f64 (fma.f64 (neg.f64 (cbrt.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2))) (pow.f64 (cbrt.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))
(+.f64 (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (neg.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2))) (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2)))
(.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale)) 2)) 1)
(.f64 1 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale)) 2)))
(.f64 (sqrt.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2))) (sqrt.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale)) 2))))
(.f64 (cbrt.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2))) (cbrt.f64 (pow.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale)) 2)) 2)))
(.f64 (cbrt.f64 (pow.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) 2)) (cbrt.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale)) 2))))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2) 2)) (/.f64 1 (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale)) 2))))
(.f64 (-.f64 (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) 3) (pow.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2) 3)) (/.f64 1 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2) (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2))))))
(.f64 (+.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) (-.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale))))
(/.f64 1 (/.f64 (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2) 2))))
(/.f64 1 (/.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2) (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))) (-.f64 (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) 3) (pow.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale)) 2) 3))))
(/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2) 2)) (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))
(/.f64 (-.f64 (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) 3) (pow.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2) 3)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2) (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale)) 2)))))
(/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (.f64 (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale)) 2))))
(/.f64 (-.f64 (.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2)) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4))) (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) x-scale) 2))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) 3) (pow.f64 (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) 3)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (-.f64 (.f64 (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2))) (.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2)) 3) (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) 3)) (+.f64 (+.f64 (.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2)) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4))) (.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2)) (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2))))
(/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2))) (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4))))) (.f64 (.f64 y-scale y-scale) (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale) 2))))
(/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2))))) (.f64 (.f64 y-scale y-scale) (+.f64 (pow.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2) 3) (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) 3)))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) x-scale) 2))))))
(/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (.f64 x-scale y-scale) 2)) (.f64 (.f64 y-scale y-scale) (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (*.f64 x-scale y-scale) 2)))
(/.f64 (-.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2)) (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4))))) (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale)) (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2))))
(/.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2)))) (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale)) (+.f64 (pow.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2) 3) (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) 3)))) (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2))))))
(/.f64 (-.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale)) (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2)))) (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale)) (pow.f64 (.f64 x-scale y-scale) 2)))
(/.f64 (-.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale) (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2))) (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4))))) (.f64 y-scale (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale) 2))))
(/.f64 (-.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2))))) (.f64 y-scale (+.f64 (pow.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2) 3) (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) 3)))) (.f64 y-scale (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) x-scale) 2))))))
(/.f64 (-.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale) (pow.f64 (.f64 x-scale y-scale) 2)) (.f64 y-scale (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2)))) (.f64 y-scale (pow.f64 (*.f64 x-scale y-scale) 2)))
(/.f64 (-.f64 (.f64 (neg.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2))) (.f64 (neg.f64 (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4))))) (.f64 (neg.f64 (.f64 y-scale y-scale)) (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale) 2))))
(/.f64 (-.f64 (.f64 (neg.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2))))) (.f64 (neg.f64 (.f64 y-scale y-scale)) (+.f64 (pow.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2) 3) (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) 3)))) (.f64 (neg.f64 (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) x-scale) 2))))))
(/.f64 (-.f64 (.f64 (neg.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (pow.f64 (.f64 x-scale y-scale) 2)) (.f64 (neg.f64 (.f64 y-scale y-scale)) (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2)))) (.f64 (neg.f64 (.f64 y-scale y-scale)) (pow.f64 (*.f64 x-scale y-scale) 2)))
(/.f64 (neg.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2) 2))) (neg.f64 (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) 3) (pow.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2) 3))) (neg.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2) (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale)) 2))))))
(pow.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) 1)
(pow.f64 (sqrt.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2))) 2)
(pow.f64 (cbrt.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2))) 3)
(pow.f64 (pow.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) 3) 1/3)
(sqrt.f64 (pow.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) 2))
(log.f64 (exp.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2))))
(log.f64 (+.f64 1 (expm1.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))))
(cbrt.f64 (pow.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) 3))
(expm1.f64 (log1p.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2))))
(exp.f64 (log.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2))))
(exp.f64 (.f64 (log.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale)) 2))) 1))
(log1p.f64 (expm1.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2))))
(fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 y-scale -2) (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))
(fma.f64 1 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))
(fma.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))
(fma.f64 (cbrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4))) (cbrt.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2)) (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))

Outputs
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 1/180 angle))
(.f64 angle (.f64 1/180 (PI.f64)))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (.f64 1/180 (.f64 angle (PI.f64))))
(fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)) (.f64 (PI.f64) (*.f64 1/180 angle)))
(fma.f64 1/180 (.f64 angle (PI.f64)) (.f64 (pow.f64 angle 3) (*.f64 (pow.f64 (PI.f64) 3) -1/34992000)))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)))))
(fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)) (fma.f64 1/180 (.f64 angle (PI.f64)) (.f64 (.f64 1/22674816000000 (pow.f64 angle 5)) (pow.f64 (PI.f64) 5))))
(fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)) (fma.f64 1/180 (.f64 angle (PI.f64)) (.f64 (pow.f64 (PI.f64) 5) (.f64 1/22674816000000 (pow.f64 angle 5)))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (+.f64 (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5))) (.f64 -1/30855889612800000000 (.f64 (pow.f64 angle 7) (pow.f64 (PI.f64) 7))))))
(fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)) (fma.f64 1/180 (.f64 angle (PI.f64)) (fma.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)) (.f64 (*.f64 -1/30855889612800000000 (pow.f64 angle 7)) (pow.f64 (PI.f64) 7)))))
(fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)) (fma.f64 1/180 (.f64 angle (PI.f64)) (fma.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)) (.f64 (pow.f64 (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 angle (.f64 1/180 (PI.f64))))
(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))))
(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))))
(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))))
(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))))
(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))))
(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))))
(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 -1 (pow.f64 x-scale 2))
(/.f64 -1 (*.f64 x-scale x-scale))
(/.f64 (/.f64 -1 x-scale) x-scale)
(-.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (/.f64 1 (pow.f64 x-scale 2)))
(fma.f64 1/32400 (/.f64 (.f64 angle angle) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (neg.f64 (/.f64 1 (*.f64 x-scale x-scale))))
(fma.f64 1/32400 (.f64 (/.f64 (.f64 angle angle) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (/.f64 -1 x-scale) x-scale))
(-.f64 (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 -1 (.f64 (pow.f64 angle 4) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))))))) (/.f64 1 (pow.f64 x-scale 2)))
(-.f64 (fma.f64 1/32400 (/.f64 (.f64 angle angle) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (neg.f64 (.f64 (pow.f64 angle 4) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) 1/3149280000)))) (/.f64 1 (.f64 x-scale x-scale)))
(fma.f64 1/32400 (.f64 (/.f64 (.f64 angle angle) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (fma.f64 (neg.f64 (pow.f64 angle 4)) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (*.f64 x-scale x-scale)) (/.f64 (/.f64 -1 x-scale) x-scale)))
(-.f64 (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1 (.f64 (pow.f64 angle 6) (+.f64 (.f64 -1/816293376000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (.f64 -1/12244400640000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2)))))) (.f64 -1 (.f64 (pow.f64 angle 4) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2)))))))) (/.f64 1 (pow.f64 x-scale 2)))
(-.f64 (fma.f64 1/32400 (/.f64 (.f64 angle angle) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 -1 (+.f64 (.f64 (pow.f64 angle 6) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale x-scale)) -1/765275040000000)) (.f64 (pow.f64 angle 4) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) 1/3149280000))))) (/.f64 1 (.f64 x-scale x-scale)))
(fma.f64 1/32400 (.f64 (/.f64 (.f64 angle angle) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (fma.f64 -1 (fma.f64 (pow.f64 angle 6) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale x-scale)) -1/765275040000000) (.f64 (pow.f64 angle 4) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)))) (/.f64 (/.f64 -1 x-scale) x-scale)))
(fma.f64 1/32400 (.f64 (/.f64 (.f64 angle angle) (.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (fma.f64 -1 (fma.f64 (pow.f64 angle 6) (/.f64 (.f64 -1/765275040000000 (pow.f64 (PI.f64) 6)) (.f64 x-scale x-scale)) (.f64 (pow.f64 angle 4) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)))) (/.f64 (/.f64 -1 x-scale) x-scale)))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 -1 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(-.f64 (exp.f64 (log1p.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) 1)
(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 angle 1/180))) 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 angle 1/180))))
(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 angle 1/180)))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(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 angle 1/180)))) 2) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(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 angle 1/180)))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) 2))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) 2)))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 (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 angle (.f64 1/180 (PI.f64)))) 4))) (fabs.f64 (cbrt.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 1)
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(pow.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1/2)
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(pow.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2)
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 3)
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(pow.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3) 1/3)
(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 angle 1/180))) 2))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(fabs.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(log.f64 (exp.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))
(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 angle 1/180))))))
(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 angle 1/180))) 3))
(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 angle 1/180)))))
(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 angle 1/180)))))
(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 angle 1/180)))) 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 angle 1/180)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2))
(+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (.f64 (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale)) 2)) 1))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2))
(+.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) (fma.f64 (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) 1 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))
(+.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2)) (+.f64 (neg.f64 (pow.f64 (hypot.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)) 2)) (pow.f64 (hypot.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)) 2)))
(+.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2)) (.f64 0 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) y-scale)) 2)))
(+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (-.f64 (.f64 0 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2)) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) y-scale)) 2)))
(+.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) (fma.f64 (neg.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale))) (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))
(+.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2)) (+.f64 (neg.f64 (pow.f64 (hypot.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)) 2)) (pow.f64 (hypot.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)) 2)))
(+.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2)) (.f64 0 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) y-scale)) 2)))
(+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (-.f64 (.f64 0 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2)) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) y-scale)) 2)))
(+.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) (fma.f64 (neg.f64 (cbrt.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2))) (pow.f64 (cbrt.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))
(+.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2)) (fma.f64 (neg.f64 (cbrt.f64 (pow.f64 (hypot.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)) 2))) (pow.f64 (cbrt.f64 (pow.f64 (hypot.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)) 2)) 2) (pow.f64 (hypot.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)) 2)))
(+.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2)) (fma.f64 (neg.f64 (cbrt.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2))) (pow.f64 (cbrt.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2)) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2)))
(+.f64 (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (.f64 0 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2))) (.f64 (neg.f64 (cbrt.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2))) (pow.f64 (cbrt.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2)) 2)))
(+.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2)) (neg.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(+.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2)) (.f64 (neg.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) 2)) (pow.f64 y-scale -2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(+.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2)) (.f64 -1 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale) 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(+.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2)) (.f64 (neg.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(+.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2)) (.f64 (neg.f64 (cbrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)))) (cbrt.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale) 2))))
(fma.f64 (neg.f64 (cbrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 y-scale 4)))) (cbrt.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2)) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) 2)))
(-.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2)) (.f64 (cbrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 4) (pow.f64 y-scale 4))) (cbrt.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) y-scale) 2))))
(+.f64 (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2))
(+.f64 (.f64 (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) 1) (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale) 2))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2))
(+.f64 (neg.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2)) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(+.f64 (.f64 (neg.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (pow.f64 y-scale -2)) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) x-scale) 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(+.f64 (.f64 -1 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2)) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) x-scale) 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(+.f64 (.f64 (neg.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) x-scale) 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(+.f64 (.f64 (neg.f64 (cbrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)))) (cbrt.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2))) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) x-scale) 2)))
(fma.f64 (neg.f64 (cbrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 y-scale 4)))) (cbrt.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2)) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) 2)))
(-.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2)) (.f64 (cbrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 4) (pow.f64 y-scale 4))) (cbrt.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) y-scale) 2))))
(+.f64 (fma.f64 (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) 1 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))
(+.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2)) (+.f64 (neg.f64 (pow.f64 (hypot.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)) 2)) (pow.f64 (hypot.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)) 2)))
(+.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2)) (.f64 0 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) y-scale)) 2)))
(+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (-.f64 (.f64 0 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2)) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) y-scale)) 2)))
(+.f64 (fma.f64 (neg.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale))) (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))
(+.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2)) (+.f64 (neg.f64 (pow.f64 (hypot.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)) 2)) (pow.f64 (hypot.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)) 2)))
(+.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2)) (.f64 0 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) y-scale)) 2)))
(+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (-.f64 (.f64 0 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2)) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) y-scale)) 2)))
(+.f64 (fma.f64 (neg.f64 (cbrt.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2))) (pow.f64 (cbrt.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))
(+.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2)) (fma.f64 (neg.f64 (cbrt.f64 (pow.f64 (hypot.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)) 2))) (pow.f64 (cbrt.f64 (pow.f64 (hypot.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)) 2)) 2) (pow.f64 (hypot.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)) 2)))
(+.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2)) (fma.f64 (neg.f64 (cbrt.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2))) (pow.f64 (cbrt.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2)) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2)))
(+.f64 (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (.f64 0 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2))) (.f64 (neg.f64 (cbrt.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2))) (pow.f64 (cbrt.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2)) 2)))
(+.f64 (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (neg.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2))) (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2)))
(neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))
(neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))
(.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale)) 2)) 1)
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2))
(.f64 1 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale)) 2)))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2))
(.f64 (sqrt.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2))) (sqrt.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale)) 2))))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2))
(.f64 (cbrt.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2))) (cbrt.f64 (pow.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale)) 2)) 2)))
(.f64 (cbrt.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))) (cbrt.f64 (pow.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2)) 2)))
(.f64 (cbrt.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2))) (cbrt.f64 (pow.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) y-scale)) 2)) 2)))
(.f64 (cbrt.f64 (pow.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) 2)) (cbrt.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale)) 2))))
(.f64 (cbrt.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))) (cbrt.f64 (pow.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2)) 2)))
(.f64 (cbrt.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2))) (cbrt.f64 (pow.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) y-scale)) 2)) 2)))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2) 2)) (/.f64 1 (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale)) 2))))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 y-scale 4)) (pow.f64 (pow.f64 (hypot.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)) 2) 2)) (/.f64 1 (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))))
(/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 4)) (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2)))
(.f64 (-.f64 (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) 3) (pow.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2) 3)) (/.f64 1 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2) (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2))))))
(.f64 (-.f64 (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) 3) (pow.f64 (pow.f64 (hypot.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)) 2) 3)) (/.f64 1 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 y-scale 4)) (.f64 (pow.f64 (hypot.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)) 2) (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) 3) (pow.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2) 3)) (fma.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2) (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 4) (pow.f64 y-scale 4))))
(.f64 (+.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) (-.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale))))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2))
(/.f64 1 (/.f64 (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2) 2))))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 y-scale 4)) (pow.f64 (pow.f64 (hypot.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)) 2) 2)) (/.f64 1 (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))))
(/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 4)) (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2)))
(/.f64 1 (/.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2) (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))) (-.f64 (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) 3) (pow.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale)) 2) 3))))
(.f64 (-.f64 (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) 3) (pow.f64 (pow.f64 (hypot.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)) 2) 3)) (/.f64 1 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 y-scale 4)) (.f64 (pow.f64 (hypot.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)) 2) (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) 3) (pow.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2) 3)) (fma.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2) (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 4) (pow.f64 y-scale 4))))
(/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2) 2)) (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 y-scale 4)) (pow.f64 (pow.f64 (hypot.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)) 2) 2)) (/.f64 1 (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))))
(/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 4)) (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2)))
(/.f64 (-.f64 (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) 3) (pow.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2) 3)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2) (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale)) 2)))))
(.f64 (-.f64 (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) 3) (pow.f64 (pow.f64 (hypot.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)) 2) 3)) (/.f64 1 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 y-scale 4)) (.f64 (pow.f64 (hypot.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)) 2) (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) 3) (pow.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2) 3)) (fma.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2) (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 4) (pow.f64 y-scale 4))))
(/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (.f64 (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale)) 2))))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 y-scale 4)) (pow.f64 (pow.f64 (hypot.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)) 2) 2)) (/.f64 1 (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))))
(/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 4)) (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2)))
(/.f64 (-.f64 (.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2)) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4))) (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) x-scale) 2))))
(/.f64 (-.f64 (.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) 2)) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 y-scale 4))) (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) 2))))
(/.f64 (-.f64 (.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2)) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 4) (pow.f64 y-scale 4))) (-.f64 (.f64 2 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2)) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2)))
(/.f64 (+.f64 (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) 3) (pow.f64 (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) 3)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (-.f64 (.f64 (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2))) (.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2))))))
(.f64 (-.f64 (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) 3) (pow.f64 (pow.f64 (hypot.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)) 2) 3)) (/.f64 1 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 y-scale 4)) (.f64 (pow.f64 (hypot.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)) 2) (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) 3) (pow.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2) 3)) (fma.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2) (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 4) (pow.f64 y-scale 4))))
(/.f64 (-.f64 (pow.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2)) 3) (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) 3)) (+.f64 (+.f64 (.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2)) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4))) (.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2)) (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2))))
(/.f64 (-.f64 (pow.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) 2)) 3) (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) 3)) (+.f64 (fma.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) 2)) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 y-scale 4))) (.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) 2)))))
(/.f64 (-.f64 (pow.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2)) 3) (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) 3)) (fma.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2)) (fma.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2)) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 4) (pow.f64 y-scale 4)))))
(/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2))) (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4))))) (.f64 (.f64 y-scale y-scale) (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale) 2))))
(/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2))) (.f64 y-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 x-scale 4)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 y-scale 4)))))) (.f64 y-scale (.f64 y-scale (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) 2)))))
(/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2))) (.f64 y-scale (.f64 y-scale (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 4) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 4) (pow.f64 y-scale 4)))))) (.f64 y-scale (.f64 y-scale (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) y-scale) 2)))))
(/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2))))) (.f64 (.f64 y-scale y-scale) (+.f64 (pow.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2) 3) (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) 3)))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) x-scale) 2))))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 x-scale 4)) (.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) 2)))) (.f64 (+.f64 (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) 3) (pow.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) 2) 3)) (.f64 y-scale (neg.f64 y-scale)))) (.f64 y-scale (.f64 y-scale (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 x-scale 4)) (.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) 2)))))))
(/.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (fma.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2)) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 4)) (.f64 (+.f64 (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) 3) (pow.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2) 3)) (.f64 y-scale (neg.f64 y-scale)))) (.f64 y-scale y-scale)) (fma.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2)) (pow.f64 (/.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale) 4)))
(/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (.f64 x-scale y-scale) 2)) (.f64 (.f64 y-scale y-scale) (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (*.f64 x-scale y-scale) 2)))
(/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 x-scale y-scale) 2)) (.f64 y-scale (.f64 y-scale (+.f64 (pow.f64 (.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))))) (.f64 y-scale (.f64 y-scale (pow.f64 (*.f64 x-scale y-scale) 2))))
(/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 2)) (.f64 (.f64 y-scale y-scale) (+.f64 (pow.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)))) (.f64 y-scale (.f64 y-scale (pow.f64 (*.f64 x-scale y-scale) 2))))
(/.f64 (-.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2)) (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4))))) (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale)) (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2))))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) 2) (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 x-scale 4)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 y-scale 4))) (.f64 (/.f64 y-scale (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) y-scale)))) (.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2)) (.f64 (/.f64 y-scale (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) y-scale)))
(/.f64 (-.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2)) (.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 4) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 4) (pow.f64 y-scale 4))) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))
(/.f64 (-.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2)) (/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 4) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 4) (pow.f64 y-scale 4))) (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2))) (/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2)) (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2)))
(/.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2)))) (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale)) (+.f64 (pow.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2) 3) (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) 3)))) (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2))))))
(/.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 x-scale 4)) (.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) 2)))) (.f64 (+.f64 (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) 3) (pow.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) 2) 3)) (.f64 (/.f64 y-scale (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) y-scale))) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 x-scale 4)) (.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) 2)))) (.f64 (/.f64 y-scale (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) y-scale)))
(/.f64 (-.f64 (fma.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2)) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 4)) (.f64 (+.f64 (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) 3) (pow.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2) 3)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (fma.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2)) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 4)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))
(/.f64 (-.f64 (fma.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2)) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 4)) (/.f64 (+.f64 (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) 3) (pow.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2) 3)) (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2))) (/.f64 (fma.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2)) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 4)) (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2)))
(/.f64 (-.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale)) (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2)))) (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale)) (pow.f64 (.f64 x-scale y-scale) 2)))
(/.f64 (-.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (+.f64 (pow.f64 (.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (/.f64 y-scale (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) y-scale))) (.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 y-scale (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) y-scale)))
(/.f64 (-.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (+.f64 (pow.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (pow.f64 (.f64 x-scale y-scale) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))
(/.f64 (-.f64 (pow.f64 (.f64 x-scale y-scale) 2) (/.f64 (+.f64 (pow.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2))) (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2)))
(/.f64 (-.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale) (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2))) (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4))))) (.f64 y-scale (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale) 2))))
(/.f64 (-.f64 (.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) y-scale)) (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 x-scale 4)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 y-scale 4))))) (.f64 y-scale (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) 2))))
(/.f64 (-.f64 (.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) y-scale)) (.f64 y-scale (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 4) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 4) (pow.f64 y-scale 4))))) (.f64 y-scale (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) y-scale) 2))))
(/.f64 (-.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2))))) (.f64 y-scale (+.f64 (pow.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2) 3) (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) 3)))) (.f64 y-scale (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) x-scale) 2))))))
(/.f64 (-.f64 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 x-scale 4)) (.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) y-scale)) (.f64 y-scale (+.f64 (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) 3) (pow.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) 2) 3)))) (.f64 y-scale (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 x-scale 4)) (.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) 2))))))
(/.f64 (-.f64 (.f64 (fma.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2)) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 4)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) y-scale)) (.f64 y-scale (+.f64 (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) 3) (pow.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2) 3)))) (.f64 y-scale (fma.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2)) (pow.f64 (/.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale) 4))))
(/.f64 (-.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale) (pow.f64 (.f64 x-scale y-scale) 2)) (.f64 y-scale (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2)))) (.f64 y-scale (pow.f64 (*.f64 x-scale y-scale) 2)))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 x-scale y-scale) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) y-scale)) (.f64 y-scale (+.f64 (pow.f64 (.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 y-scale (pow.f64 (*.f64 x-scale y-scale) 2)))
(/.f64 (fma.f64 (pow.f64 (.f64 x-scale y-scale) 2) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) y-scale) (.f64 (+.f64 (pow.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (neg.f64 y-scale))) (.f64 y-scale (pow.f64 (.f64 x-scale y-scale) 2)))
(/.f64 (-.f64 (.f64 (neg.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2))) (.f64 (neg.f64 (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4))))) (.f64 (neg.f64 (.f64 y-scale y-scale)) (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale) 2))))
(/.f64 (+.f64 (.f64 (neg.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2))) (.f64 y-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 x-scale 4)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 y-scale 4)))))) (.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2)) (*.f64 y-scale (neg.f64 y-scale))))
(/.f64 (fma.f64 (neg.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2)) (.f64 y-scale (.f64 y-scale (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 4) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 4) (pow.f64 y-scale 4)))))) (.f64 y-scale (.f64 (neg.f64 y-scale) (-.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2) (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2)))))
(/.f64 (-.f64 (.f64 (neg.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2))))) (.f64 (neg.f64 (.f64 y-scale y-scale)) (+.f64 (pow.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) 2) 3) (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) 3)))) (.f64 (neg.f64 (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) x-scale) 2))))))
(/.f64 (+.f64 (.f64 (neg.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 x-scale 4)) (.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) 2))))) (.f64 (.f64 y-scale y-scale) (+.f64 (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) 3) (pow.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) 2) 3)))) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 x-scale 4)) (.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) 2)))) (*.f64 y-scale (neg.f64 y-scale))))
(/.f64 (fma.f64 (neg.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (fma.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2)) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 4)) (.f64 y-scale (.f64 y-scale (+.f64 (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) 3) (pow.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2) 3))))) (.f64 (.f64 y-scale y-scale) (neg.f64 (fma.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2)) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 4)))))
(/.f64 (-.f64 (.f64 (neg.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (pow.f64 (.f64 x-scale y-scale) 2)) (.f64 (neg.f64 (.f64 y-scale y-scale)) (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2)))) (.f64 (neg.f64 (.f64 y-scale y-scale)) (pow.f64 (*.f64 x-scale y-scale) 2)))
(/.f64 (+.f64 (.f64 (neg.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (.f64 x-scale y-scale) 2)) (.f64 y-scale (.f64 y-scale (+.f64 (pow.f64 (.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))))) (.f64 (pow.f64 (.f64 x-scale y-scale) 2) (*.f64 y-scale (neg.f64 y-scale))))
(/.f64 (fma.f64 (neg.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 y-scale y-scale) (+.f64 (pow.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)))) (.f64 y-scale (.f64 (neg.f64 y-scale) (pow.f64 (.f64 x-scale y-scale) 2))))
(/.f64 (neg.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2) 2))) (neg.f64 (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2))))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 y-scale 4)) (pow.f64 (pow.f64 (hypot.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)) 2) 2)) (/.f64 1 (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))))
(/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 4)) (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) 3) (pow.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2) 3))) (neg.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2) (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale)) 2))))))
(.f64 (-.f64 (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) 3) (pow.f64 (pow.f64 (hypot.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)) 2) 3)) (/.f64 1 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 y-scale 4)) (.f64 (pow.f64 (hypot.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)) 2) (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) 3) (pow.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2) 3)) (fma.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2) (+.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 4) (pow.f64 y-scale 4))))
(pow.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) 1)
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2))
(pow.f64 (sqrt.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2))) 2)
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2))
(pow.f64 (cbrt.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2))) 3)
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2))
(pow.f64 (pow.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) 3) 1/3)
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2))
(sqrt.f64 (pow.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) 2))
(sqrt.f64 (pow.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2)) 2))
(fabs.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2)))
(log.f64 (exp.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2))))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2))
(log.f64 (+.f64 1 (expm1.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2))
(cbrt.f64 (pow.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)) 3))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2))
(expm1.f64 (log1p.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2))))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2))
(exp.f64 (log.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2))))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2))
(exp.f64 (.f64 (log.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) y-scale)) 2))) 1))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2))
(log1p.f64 (expm1.f64 (-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2))))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2))
(fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 y-scale -2) (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2))
(fma.f64 1 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2) (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2))
(fma.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2) (pow.f64 (hypot.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)) 2))
(-.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2) (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2))
(fma.f64 (cbrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4))) (cbrt.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale) 2)) (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))
(fma.f64 (cbrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 y-scale 4))) (cbrt.f64 (pow.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) 2)) (neg.f64 (pow.f64 (hypot.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)) 2)))
(fma.f64 (cbrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 4) (pow.f64 y-scale 4))) (cbrt.f64 (pow.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) 2)) (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale)) 2)))

eval1.2s (0.8%)

Compiler: Compiled 70242 to 41464 computations (41% saved)

prune933.0ms (0.6%)

Pruning

93 alts after pruning (92 fresh and 1 done)

	Pruned	Kept	Total
New	1510	66	1576
Fresh	36	26	62
Picked	1	0	1
Done	3	1	4
Total	1550	93	1643

Accurracy

86.6%

Counts

1643 → 93

Alt Table

Click to see full alt table

Status	Accuracy	Program
	38.7%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (pow.f64 (pow.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) 3) 1/3)))
	33.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))) 3)))
	49.1%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (neg.f64 (cbrt.f64 (/.f64 y-scale x-scale)))))))
▶	35.1%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (cbrt.f64 (/.f64 y-scale x-scale))))))
	21.8%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (/.f64 (.f64 -180 (.f64 (.f64 y-scale b) b)) (.f64 angle x-scale)) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))
	18.2%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (/.f64 (sqrt.f64 y-scale) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 (sqrt.f64 y-scale) (cbrt.f64 x-scale))))))
	16.4%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 3)) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2))))
▶	31.8%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
	33.6%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 x-scale) 2)) (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cbrt.f64 x-scale)))))
	35.7%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
	33.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (/.f64 1 x-scale) (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) y-scale))))
	35.1%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))
	33.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (.f64 y-scale (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) x-scale)))
	46.7%	(.f64 (/.f64 180 (PI.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))))))))
	18.2%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (sqrt.f64 y-scale) (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sqrt.f64 y-scale) (/.f64 1 x-scale))))))
	48.1%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (neg.f64 y-scale) (.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (cbrt.f64 x-scale)) (pow.f64 (cbrt.f64 x-scale) 2)))))
	48.2%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (neg.f64 y-scale) (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))))
	36.2%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (cbrt.f64 y-scale)))))
	33.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 y-scale (/.f64 x-scale (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))))
	33.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 y-scale (.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (cbrt.f64 x-scale)) (pow.f64 (cbrt.f64 x-scale) 2)))))
	33.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))))
	49.2%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 -1 (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale)))))
	49.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 -1 (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale y-scale)))))
	39.1%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 -180 (/.f64 (.f64 (*.f64 x-scale (PI.f64)) angle) y-scale))))
	47.9%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 y-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
	47.8%	(.f64 (/.f64 180 (PI.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))))))))
	19.0%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (/.f64 (.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) -1/2) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
	6.7%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (/.f64 (.f64 180 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (PI.f64) (.f64 (-.f64 (.f64 b b) (.f64 a a)) angle))))))
	18.7%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (/.f64 (.f64 -1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (*.f64 a a)))))))
	20.7%	(.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 1 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))))))))
	17.7%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (.f64 -1/2 (/.f64 (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 1 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))))))))))
▶	50.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
	42.4%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))
	25.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (pow.f64 (sqrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
	48.4%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (pow.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3))))))
	50.1%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
	48.6%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
	29.1%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (neg.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))) y-scale)))))
	39.1%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 -180 (/.f64 y-scale (.f64 (.f64 angle (PI.f64)) x-scale)))))
	20.8%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 -180 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))
	37.7%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (neg.f64 (pow.f64 (pow.f64 (/.f64 y-scale (.f64 x-scale (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) 3) 1/3))))
	47.5%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (neg.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale (.f64 x-scale (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) 3))))
	47.6%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (neg.f64 (/.f64 (/.f64 y-scale (tan.f64 (.f64 (*.f64 1/180 (PI.f64)) angle))) x-scale))))
	48.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (neg.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 (cbrt.f64 x-scale) (pow.f64 (cbrt.f64 x-scale) 2)))))))
	48.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (neg.f64 (/.f64 y-scale (.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
	37.7%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (neg.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (expm1.f64 (log1p.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))))))
	36.1%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (neg.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (expm1.f64 (log1p.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
	22.5%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (neg.f64 (.f64 (sqrt.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (sqrt.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))))))))))
	40.1%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (neg.f64 (.f64 180 (/.f64 (/.f64 y-scale x-scale) (*.f64 angle (PI.f64)))))))
	46.8%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (neg.f64 (log.f64 (exp.f64 (/.f64 y-scale (.f64 x-scale (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))))))
	39.0%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (neg.f64 (fabs.f64 (/.f64 y-scale (.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
	27.8%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (neg.f64 (exp.f64 (log.f64 (/.f64 y-scale (.f64 x-scale (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))))))
	21.2%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (exp.f64 (log.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))))))
	7.1%	(.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)))
	12.2%	(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 (/.f64 x-scale (*.f64 (PI.f64) y-scale)) -180) angle)) (PI.f64)))
	12.3%	(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 (/.f64 x-scale (*.f64 angle (PI.f64))) -180) y-scale)) (PI.f64)))
	12.2%	(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 (/.f64 x-scale y-scale) -180) (*.f64 angle (PI.f64)))) (PI.f64)))
	12.2%	(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 (neg.f64 x-scale) -180) (.f64 y-scale (neg.f64 (.f64 angle (PI.f64)))))) (PI.f64)))
	12.2%	(.f64 180 (/.f64 (atan.f64 (/.f64 -180 (.f64 (/.f64 y-scale x-scale) (*.f64 angle (PI.f64))))) (PI.f64)))
	12.2%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 (/.f64 (.f64 -2 x-scale) y-scale) (.f64 (PI.f64) angle)))) (PI.f64)))
	39.1%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 (.f64 -2 y-scale) (.f64 (PI.f64) (*.f64 angle x-scale))))) (PI.f64)))
	9.6%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (/.f64 (.f64 (.f64 angle (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))) (PI.f64)))
	11.3%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.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 (PI.f64) (+.f64 (.f64 b (neg.f64 b)) (*.f64 a a)))) (/.f64 y-scale angle)))) (PI.f64)))
	34.0%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale x-scale) (.f64 (/.f64 (/.f64 (.f64 b b) (.f64 angle (-.f64 b a))) (*.f64 (PI.f64) (+.f64 b a))) -2)))) (PI.f64)))
	9.4%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (/.f64 (/.f64 (.f64 -2 x-scale) (*.f64 y-scale y-scale)) (PI.f64))))) (PI.f64)))
	9.9%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 (/.f64 b (.f64 x-scale x-scale)) b)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))) (PI.f64)))
▶	2.3%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (*.f64 a a)))))) (PI.f64)))
	39.1%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (/.f64 -2 (.f64 x-scale (PI.f64)))))) (PI.f64)))
✓	23.6%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (-.f64 b a))))))) (PI.f64)))
	4.8%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (neg.f64 a) (.f64 y-scale y-scale))))))) (PI.f64)))
	11.7%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (+.f64 (/.f64 (.f64 b b) (.f64 a (.f64 x-scale x-scale))) (-.f64 (.f64 -1 (+.f64 (/.f64 b (.f64 y-scale y-scale)) (/.f64 a (.f64 y-scale y-scale)))) (/.f64 (.f64 b b) (.f64 a (.f64 y-scale y-scale)))))))))) (PI.f64)))
	35.5%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (neg.f64 (/.f64 (.f64 b b) (.f64 (-.f64 b a) (.f64 x-scale x-scale))))))))) (PI.f64)))
	44.0%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (neg.f64 (/.f64 b (.f64 x-scale x-scale)))))))) (PI.f64)))
	9.1%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (log1p.f64 (expm1.f64 (.f64 (/.f64 (.f64 x-scale 2) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (PI.f64)))))))) (PI.f64)))
	3.9%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 2 (/.f64 x-scale (/.f64 (.f64 (.f64 (PI.f64) angle) (-.f64 (.f64 b b) (.f64 a a))) (.f64 a (/.f64 a y-scale))))))) (PI.f64)))
	21.4%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 y-scale (/.f64 (.f64 (.f64 x-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) (.f64 b b)))))) (PI.f64)))
	7.9%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (fabs.f64 (*.f64 angle (PI.f64)))))))) (PI.f64)))
	12.2%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (.f64 (/.f64 1 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))))) (PI.f64)))
	31.0%	(.f64 180 (/.f64 (atan.f64 (.f64 1/2 (/.f64 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 y-scale -2) (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))))))) (PI.f64)))
	47.4%	(.f64 180 (/.f64 (atan.f64 (.f64 1/2 (/.f64 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale (/.f64 (/.f64 -1 x-scale) x-scale)))))) (PI.f64)))
	14.6%	(.f64 180 (/.f64 (atan.f64 (.f64 1/2 (/.f64 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale (-.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)) (/.f64 (pow.f64 (exp.f64 (log.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) 2) (*.f64 y-scale y-scale))))))))) (PI.f64)))
	47.4%	(.f64 180 (/.f64 (atan.f64 (.f64 1/2 (/.f64 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))))))) (PI.f64)))
	47.3%	(.f64 180 (/.f64 (atan.f64 (.f64 1/2 (/.f64 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale (neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))))))) (PI.f64)))
	32.6%	(.f64 180 (/.f64 (atan.f64 (.f64 1/2 (/.f64 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 1) (.f64 y-scale (-.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)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))))))))) (PI.f64)))
	29.2%	(.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 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)))) (pow.f64 (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 3))))) (PI.f64)))
	27.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 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 1) (-.f64 (.f64 b b) (.f64 a a))))))) (PI.f64)))
	22.1%	(.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 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)))) (expm1.f64 (log1p.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))))))) (PI.f64)))
	31.0%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.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 (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))))))) (PI.f64)))
	30.9%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (.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 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90))))) (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)))))) (PI.f64)))
	47.7%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (PI.f64)))
	12.3%	(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 (/.f64 (/.f64 x-scale angle) (PI.f64)) y-scale))) (PI.f64)))
▶	12.2%	(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
	8.5%	(.f64 180 (/.f64 (atan.f64 (fabs.f64 (.f64 -180 (/.f64 (/.f64 (/.f64 x-scale angle) (PI.f64)) y-scale)))) (PI.f64)))

Compiler

Compiled 6411 to 4684 computations (26.9% saved)

localize75.0ms (0.1%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	98.8%	(pow.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)
✓	96.6%	(.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
✓	58.9%	(cos.f64 (pow.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3))
	58.7%	(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))

Compiler

Compiled 144 to 95 computations (34% saved)

series29.0ms (0%)

Counts

3 → 34

Calls

15 calls:

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

rewrite236.0ms (0.2%)

Algorithm

1×	batch-egg-rewrite

Rules

1586×	`associate-/l*`
408×	`add-sqr-sqrt`
390×	`*-un-lft-identity`
388×	`pow1`
384×	`distribute-lft-in`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	20	93
1	423	65
2	5241	65

Stop Event

1×	node limit

Counts

3 → 238

Calls

Call 1

Inputs

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

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

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

Outputs

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

(((+.f64 0 (/.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((+.f64 (-.f64 0 (exp.f64 (log1p.f64 (/.f64 y-scale (*.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((+.f64 (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 0) (/.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((+.f64 (*.f64 (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) -1) 0) (/.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((-.f64 0 (/.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((-.f64 (exp.f64 (log1p.f64 (/.f64 y-scale (*.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 (*.f64 (/.f64 x-scale y-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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 (/.f64 x-scale y-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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 (sin.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 (neg.f64 (sin.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 y-scale (/.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 y-scale (/.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (neg.f64 (/.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 y-scale (/.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 y-scale (/.f64 (*.f64 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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (/.f64 y-scale x-scale) (/.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (/.f64 y-scale x-scale) (/.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 1 (/.f64 1 (/.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 1 (/.f64 (*.f64 (/.f64 x-scale y-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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 1 (/.f64 (/.f64 x-scale 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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 1 (/.f64 (neg.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 1 (/.f64 (*.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 1 (/.f64 (*.f64 (/.f64 x-scale y-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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 1 (*.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (sqrt.f64 y-scale) (/.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (sqrt.f64 y-scale) (/.f64 (*.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (sqrt.f64 y-scale) (*.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (/.f64 1 (sqrt.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 (/.f64 x-scale y-scale) (/.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (/.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (/.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (neg.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 (/.f64 y-scale 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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (/.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 (sqrt.f64 (/.f64 y-scale 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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (sqrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (*.f64 (/.f64 x-scale y-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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (sqrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (/.f64 x-scale y-scale) (*.f64 (sqrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 1 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (sqrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (*.f64 (/.f64 x-scale y-scale) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (neg.f64 (sqrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (/.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (/.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (neg.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (cbrt.f64 (/.f64 y-scale 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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (/.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 (cbrt.f64 (/.f64 y-scale 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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (*.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (*.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (/.f64 1 (cbrt.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 (/.f64 x-scale y-scale) (cbrt.f64 (pow.f64 (/.f64 1 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (cbrt.f64 (pow.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (/.f64 (/.f64 x-scale y-scale) (/.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (/.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (cbrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (*.f64 (/.f64 x-scale y-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (cbrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (cbrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (/.f64 (*.f64 (/.f64 x-scale y-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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (cbrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (/.f64 (/.f64 x-scale y-scale) (*.f64 (cbrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 1 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (cbrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (/.f64 (*.f64 (/.f64 x-scale y-scale) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (neg.f64 (cbrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (cbrt.f64 (pow.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale 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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (neg.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (neg.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (neg.f64 y-scale) (/.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (neg.f64 y-scale) (/.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (neg.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (neg.f64 y-scale) (/.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (neg.f64 y-scale) (/.f64 (*.f64 (neg.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (neg.f64 y-scale) (/.f64 (*.f64 (neg.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (neg.f64 y-scale) (/.f64 (*.f64 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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (neg.f64 y-scale) (/.f64 (*.f64 (neg.f64 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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (neg.f64 y-scale) (*.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 -1 (/.f64 1 (/.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 -1 (/.f64 (neg.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 -1 (/.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 -1 (/.f64 (*.f64 (/.f64 x-scale y-scale) (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 -1 (*.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 -1 (*.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 -1 (*.f64 (/.f64 x-scale y-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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (/.f64 1 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (/.f64 1 x-scale) (/.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 (/.f64 x-scale y-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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (/.f64 x-scale y-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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 (sin.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (sqrt.f64 (*.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))) (sqrt.f64 (*.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (sqrt.f64 (*.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)))) (sqrt.f64 (*.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (sqrt.f64 (neg.f64 y-scale)) (/.f64 (*.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (sqrt.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 (*.f64 (/.f64 x-scale y-scale) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (sqrt.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))) (cbrt.f64 (*.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))) (cbrt.f64 (*.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))) (cbrt.f64 (*.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)))) (cbrt.f64 (*.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 (cbrt.f64 (neg.f64 y-scale)) (cbrt.f64 (neg.f64 y-scale))) (/.f64 (*.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 (cbrt.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (cbrt.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (/.f64 (*.f64 (/.f64 x-scale y-scale) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (cbrt.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 -1 (sqrt.f64 (/.f64 y-scale x-scale))) (/.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 -1 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2)) (/.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 (/.f64 y-scale x-scale) (sqrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (/.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 (/.f64 y-scale x-scale) (sqrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 (neg.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 (/.f64 y-scale x-scale) (cbrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 (/.f64 y-scale x-scale) (cbrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (neg.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 (/.f64 y-scale 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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 -1 (neg.f64 y-scale)) (*.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 (neg.f64 y-scale) (/.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 (neg.f64 y-scale) (/.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 y-scale 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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 y-scale (/.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 (neg.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 (neg.f64 y-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 (neg.f64 y-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 (neg.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 (neg.f64 y-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (/.f64 (neg.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (/.f64 (neg.f64 y-scale) (sqrt.f64 x-scale)) (*.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (/.f64 (neg.f64 y-scale) (cbrt.f64 (*.f64 x-scale x-scale))) (*.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (/.f64 1 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (/.f64 1 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 1) (*.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #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 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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #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 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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (/.f64 y-scale (sqrt.f64 x-scale)) (*.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (/.f64 y-scale (cbrt.f64 (*.f64 x-scale x-scale))) (*.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (/.f64 1 (sqrt.f64 x-scale)) (/.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (/.f64 1 (cbrt.f64 (*.f64 x-scale x-scale))) (/.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale 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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (neg.f64 (sqrt.f64 (/.f64 y-scale x-scale))) (/.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (neg.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2)) (/.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (neg.f64 (sqrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 (*.f64 (/.f64 x-scale y-scale) (neg.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (neg.f64 (cbrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 (/.f64 x-scale y-scale) (neg.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (neg.f64 (sqrt.f64 y-scale)) (/.f64 (*.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (neg.f64 (pow.f64 (cbrt.f64 y-scale) 2)) (/.f64 (*.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (neg.f64 (neg.f64 y-scale)) (*.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (neg.f64 (neg.f64 y-scale)) (*.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (neg.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (sqrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 (/.f64 y-scale x-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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (sqrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 (sqrt.f64 (/.f64 y-scale x-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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (-.f64 0 (pow.f64 (/.f64 y-scale x-scale) 2)) (*.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (-.f64 0 (pow.f64 (/.f64 y-scale x-scale) 3)) (*.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (+.f64 0 (+.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (*.f64 0 (/.f64 y-scale x-scale)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 1) (/.f64 (/.f64 x-scale y-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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (/.f64 (sqrt.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 x-scale y-scale) (/.f64 (sqrt.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (/.f64 (cbrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) 1) (/.f64 (/.f64 x-scale y-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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (/.f64 (cbrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 (/.f64 x-scale y-scale) (/.f64 (cbrt.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (/.f64 (cbrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (/.f64 (/.f64 x-scale y-scale) (/.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (/.f64 (sqrt.f64 y-scale) 1) (/.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (/.f64 (sqrt.f64 y-scale) (cbrt.f64 (*.f64 x-scale x-scale))) (/.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) 1) (/.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (sqrt.f64 x-scale)) (/.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (cbrt.f64 (*.f64 x-scale x-scale))) (/.f64 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 (neg.f64 y-scale) 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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 (neg.f64 y-scale) 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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 (neg.f64 y-scale) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 (neg.f64 y-scale) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (neg.f64 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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (neg.f64 y-scale)) (*.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 y-scale)) (*.f64 (neg.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (*.f64 y-scale (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((/.f64 (neg.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (/.f64 x-scale y-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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((pow.f64 (/.f64 y-scale (*.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((pow.f64 (sqrt.f64 (/.f64 y-scale (*.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((pow.f64 (cbrt.f64 (/.f64 y-scale (*.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((pow.f64 (pow.f64 (/.f64 y-scale (*.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((neg.f64 (/.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((sqrt.f64 (pow.f64 (/.f64 y-scale (*.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((log.f64 (exp.f64 (/.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((log.f64 (+.f64 1 (expm1.f64 (/.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((cbrt.f64 (pow.f64 (/.f64 y-scale (*.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((cbrt.f64 (*.f64 (pow.f64 (/.f64 y-scale x-scale) 3) (pow.f64 (/.f64 1 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((cbrt.f64 (*.f64 (pow.f64 (/.f64 1 (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((expm1.f64 (log1p.f64 (/.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((exp.f64 (log.f64 (/.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((exp.f64 (*.f64 (log.f64 (/.f64 y-scale (*.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((log1p.f64 (expm1.f64 (/.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((*.f64 (PI.f64) (*.f64 1/180 angle)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((*.f64 1/180 (*.f64 angle (PI.f64))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((*.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((*.f64 (*.f64 1/180 angle) (PI.f64)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((*.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((*.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((*.f64 1 (*.f64 (PI.f64) (*.f64 1/180 angle))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((*.f64 (sqrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (sqrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((*.f64 (sqrt.f64 (*.f64 1/180 angle)) (*.f64 (sqrt.f64 (*.f64 1/180 angle)) (PI.f64))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((*.f64 (sqrt.f64 (PI.f64)) (*.f64 (sqrt.f64 (PI.f64)) (*.f64 1/180 angle))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((*.f64 (pow.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)) 1/6) (*.f64 (pow.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)) 1/6) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((*.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((*.f64 (pow.f64 (cbrt.f64 (*.f64 1/180 angle)) 2) (*.f64 (cbrt.f64 (*.f64 1/180 angle)) (PI.f64))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((*.f64 (cbrt.f64 (PI.f64)) (*.f64 (cbrt.f64 (*.f64 1/180 angle)) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((*.f64 (pow.f64 (cbrt.f64 (PI.f64)) 2) (*.f64 (cbrt.f64 (PI.f64)) (*.f64 1/180 angle))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((*.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (*.f64 (cbrt.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((*.f64 (*.f64 (PI.f64) 1/180) angle) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((*.f64 (*.f64 (PI.f64) angle) 1/180) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((*.f64 (*.f64 (PI.f64) (sqrt.f64 (*.f64 1/180 angle))) (sqrt.f64 (*.f64 1/180 angle))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((*.f64 (*.f64 (PI.f64) (pow.f64 (cbrt.f64 (*.f64 1/180 angle)) 2)) (cbrt.f64 (*.f64 1/180 angle))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((*.f64 (*.f64 (*.f64 1/180 angle) (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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((*.f64 (*.f64 (*.f64 1/180 angle) (pow.f64 (cbrt.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((*.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) 1) (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((*.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)) 1/6)) (pow.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((*.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (cbrt.f64 (PI.f64))) (cbrt.f64 (*.f64 1/180 angle))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((*.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cbrt.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (cbrt.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((*.f64 (*.f64 (*.f64 (PI.f64) 1/180) 1) angle) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((*.f64 (*.f64 (*.f64 (PI.f64) 1/180) (sqrt.f64 angle)) (sqrt.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((*.f64 (*.f64 (*.f64 (PI.f64) 1/180) (pow.f64 (cbrt.f64 angle) 2)) (cbrt.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((*.f64 (pow.f64 (pow.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)) 1/6) 3) (pow.f64 (pow.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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)) ((*.f64 (pow.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) 3) (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #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>) ((cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #f)))

simplify421.0ms (0.3%)

Algorithm

1×	egg-herbie

Rules

1282×	`times-frac`
1230×	`associate-/l*`
1088×	`associate-/r*`
1060×	`associate-r`
766×	`associate-l`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	631	13412
1	1726	13370

Stop Event

1×	node limit

Counts

272 → 364

Calls

Call 1

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

localize24.0ms (0%)

Local Accuracy

Found 4 expressions with local accuracy:

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

Compiler

Compiled 71 to 26 computations (63.4% saved)

series2.0ms (0%)

Counts

1 → 0

Calls

9 calls:

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

rewrite116.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

1742×	`associate-*r/`
1672×	`associate-/l*`
1410×	`associate-*l/`
254×	`add-sqr-sqrt`
250×	`pow1`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	12	27
1	248	27
2	3251	27

Stop Event

1×	node limit

Counts

1 → 111

Calls

Call 1

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

Outputs

(((-.f64 (exp.f64 (log1p.f64 (*.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 -180 (*.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 x-scale (/.f64 (*.f64 angle (*.f64 (PI.f64) y-scale)) -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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 1 (/.f64 y-scale (/.f64 -180 (/.f64 (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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 -180 x-scale) (*.f64 angle (*.f64 (PI.f64) y-scale))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (/.f64 x-scale y-scale) (/.f64 (*.f64 angle (PI.f64)) -180)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (neg.f64 x-scale) (/.f64 (*.f64 (*.f64 angle (PI.f64)) (neg.f64 y-scale)) -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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 180 (neg.f64 (*.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (sqrt.f64 (*.f64 -180 x-scale)) (/.f64 (*.f64 angle (*.f64 (PI.f64) y-scale)) (sqrt.f64 (*.f64 -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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (cbrt.f64 (*.f64 -180 x-scale)) (cbrt.f64 (*.f64 -180 x-scale))) (/.f64 (*.f64 angle (*.f64 (PI.f64) y-scale)) (cbrt.f64 (*.f64 -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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 -180 (sqrt.f64 x-scale)) (/.f64 (*.f64 angle (*.f64 (PI.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 -180 (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 angle (/.f64 (cbrt.f64 x-scale) (*.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (/.f64 -180 (/.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 -180 (neg.f64 x-scale)) (*.f64 (*.f64 angle (PI.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (neg.f64 x-scale) -180) (*.f64 (*.f64 angle (PI.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (/.f64 -180 (/.f64 (PI.f64) (/.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (/.f64 x-scale -1/180) (*.f64 angle (*.f64 (PI.f64) y-scale))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (/.f64 (*.f64 -180 x-scale) (sqrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale)))) (sqrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (/.f64 -180 (/.f64 (pow.f64 (cbrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale))) 2) x-scale)) (cbrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (/.f64 -180 (/.f64 (*.f64 y-scale angle) 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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (neg.f64 (*.f64 -180 x-scale)) (*.f64 (*.f64 angle (PI.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (*.f64 -180 x-scale) 1) (*.f64 angle (*.f64 (PI.f64) y-scale))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (*.f64 -180 x-scale) 1) (/.f64 (*.f64 angle (*.f64 (PI.f64) y-scale)) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 -180 (/.f64 x-scale 1)) (*.f64 angle (*.f64 (PI.f64) y-scale))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 -180 (/.f64 x-scale (*.f64 angle (PI.f64)))) y-scale) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 -180 (/.f64 x-scale (sqrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale))))) (sqrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 -180 (/.f64 x-scale (pow.f64 (cbrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale))) 2))) (cbrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 -180 (/.f64 x-scale (*.f64 y-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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 -180 (/.f64 x-scale (*.f64 (PI.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 -180 (/.f64 (/.f64 x-scale y-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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 -180 (/.f64 (/.f64 x-scale y-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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 -180 (neg.f64 (/.f64 x-scale y-scale))) (neg.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 -180 (neg.f64 (neg.f64 x-scale))) (neg.f64 (*.f64 (*.f64 angle (PI.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 1 (/.f64 -180 (/.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 1 (*.f64 -180 (neg.f64 x-scale))) (*.f64 (*.f64 angle (PI.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 1 (*.f64 (neg.f64 x-scale) -180)) (*.f64 (*.f64 angle (PI.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 1 (/.f64 -180 (/.f64 (PI.f64) (/.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 1 (/.f64 x-scale -1/180)) (*.f64 angle (*.f64 (PI.f64) y-scale))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 1 (/.f64 (*.f64 -180 x-scale) (sqrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale))))) (sqrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 1 (/.f64 -180 (/.f64 (pow.f64 (cbrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale))) 2) x-scale))) (cbrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 1 (/.f64 -180 (/.f64 (*.f64 y-scale angle) 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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 1 (neg.f64 (*.f64 -180 x-scale))) (*.f64 (*.f64 angle (PI.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (sqrt.f64 (*.f64 -180 x-scale))) (sqrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) 2) (cbrt.f64 (*.f64 -180 x-scale))) (cbrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (*.f64 -180 x-scale) (/.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (*.f64 -180 x-scale) (/.f64 1 (*.f64 angle (PI.f64)))) y-scale) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (*.f64 -180 x-scale) (/.f64 1 (sqrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale))))) (sqrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (*.f64 -180 x-scale) (/.f64 1 (pow.f64 (cbrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale))) 2))) (cbrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (*.f64 -180 x-scale) (/.f64 1 (*.f64 y-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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (*.f64 -180 x-scale) -1) (*.f64 (*.f64 angle (PI.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (*.f64 -180 (sqrt.f64 (/.f64 x-scale (*.f64 angle (*.f64 (PI.f64) y-scale))))) 1) (sqrt.f64 (*.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (*.f64 -180 (sqrt.f64 (/.f64 x-scale (*.f64 angle (*.f64 (PI.f64) y-scale))))) (sqrt.f64 x-scale)) (sqrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (*.f64 -180 (sqrt.f64 (/.f64 x-scale (*.f64 angle (*.f64 (PI.f64) y-scale))))) (sqrt.f64 (neg.f64 x-scale))) (sqrt.f64 (*.f64 (*.f64 angle (PI.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (*.f64 -180 (sqrt.f64 (/.f64 x-scale (*.f64 angle (*.f64 (PI.f64) y-scale))))) (sqrt.f64 (/.f64 x-scale y-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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (*.f64 -180 (pow.f64 (cbrt.f64 (/.f64 x-scale (*.f64 angle (*.f64 (PI.f64) y-scale)))) 2)) 1) (cbrt.f64 (*.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (*.f64 -180 (pow.f64 (cbrt.f64 (/.f64 x-scale (*.f64 angle (*.f64 (PI.f64) y-scale)))) 2)) (cbrt.f64 x-scale)) (cbrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (*.f64 -180 (pow.f64 (cbrt.f64 (/.f64 x-scale (*.f64 angle (*.f64 (PI.f64) y-scale)))) 2)) (cbrt.f64 (neg.f64 x-scale))) (cbrt.f64 (*.f64 (*.f64 angle (PI.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (*.f64 -180 (pow.f64 (cbrt.f64 (/.f64 x-scale (*.f64 angle (*.f64 (PI.f64) y-scale)))) 2)) (cbrt.f64 (/.f64 x-scale y-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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (/.f64 -180 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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (/.f64 -180 (*.f64 angle (PI.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (/.f64 -180 (*.f64 angle (PI.f64))) 1) (/.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (/.f64 -180 (*.f64 angle (PI.f64))) (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>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (/.f64 -180 (*.f64 angle (PI.f64))) (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>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (/.f64 -180 (*.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (/.f64 -180 (*.f64 angle (PI.f64))) (/.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>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (/.f64 -180 (*.f64 angle (PI.f64))) (/.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>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (/.f64 -180 (*.f64 angle (PI.f64))) (/.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>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (/.f64 -180 (sqrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale)))) x-scale) (sqrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (/.f64 -180 (pow.f64 (cbrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale))) 2)) x-scale) (cbrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (/.f64 -180 (*.f64 y-scale angle)) 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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (sqrt.f64 x-scale) -180) (/.f64 (*.f64 angle (*.f64 (PI.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (pow.f64 (cbrt.f64 x-scale) 2) -180) (/.f64 angle (/.f64 (cbrt.f64 x-scale) (*.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (/.f64 x-scale 1) -180) (*.f64 angle (*.f64 (PI.f64) y-scale))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (/.f64 x-scale (*.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (/.f64 x-scale (sqrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale)))) -180) (sqrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (/.f64 x-scale (pow.f64 (cbrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale))) 2)) -180) (cbrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (/.f64 x-scale (*.f64 y-scale 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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (/.f64 x-scale (*.f64 (PI.f64) y-scale)) -180) angle) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (/.f64 (/.f64 x-scale y-scale) (sqrt.f64 (*.f64 angle (PI.f64)))) -180) (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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (/.f64 (/.f64 x-scale y-scale) (pow.f64 (cbrt.f64 (*.f64 angle (PI.f64))) 2)) -180) (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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (neg.f64 (/.f64 x-scale y-scale)) -180) (neg.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (neg.f64 (neg.f64 x-scale)) -180) (neg.f64 (*.f64 (*.f64 angle (PI.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (/.f64 -180 (/.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (*.f64 -180 (neg.f64 x-scale)) 1) (*.f64 (*.f64 angle (PI.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (*.f64 (neg.f64 x-scale) -180) 1) (*.f64 (*.f64 angle (PI.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (/.f64 -180 (/.f64 (PI.f64) (/.f64 x-scale angle))) 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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (/.f64 x-scale -1/180) 1) (*.f64 angle (*.f64 (PI.f64) y-scale))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (/.f64 (*.f64 -180 x-scale) (sqrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale)))) 1) (sqrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (/.f64 -180 (/.f64 (pow.f64 (cbrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale))) 2) x-scale)) 1) (cbrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (/.f64 -180 (/.f64 (*.f64 y-scale angle) x-scale)) 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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (neg.f64 (*.f64 -180 x-scale)) 1) (*.f64 (*.f64 angle (PI.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 1 (*.f64 -180 (sqrt.f64 (/.f64 x-scale (*.f64 angle (*.f64 (PI.f64) y-scale)))))) (sqrt.f64 (*.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (sqrt.f64 x-scale) (*.f64 -180 (sqrt.f64 (/.f64 x-scale (*.f64 angle (*.f64 (PI.f64) y-scale)))))) (sqrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (sqrt.f64 (neg.f64 x-scale)) (*.f64 -180 (sqrt.f64 (/.f64 x-scale (*.f64 angle (*.f64 (PI.f64) y-scale)))))) (sqrt.f64 (*.f64 (*.f64 angle (PI.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (sqrt.f64 (/.f64 x-scale y-scale)) (*.f64 -180 (sqrt.f64 (/.f64 x-scale (*.f64 angle (*.f64 (PI.f64) y-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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (sqrt.f64 (*.f64 -180 x-scale)) (sqrt.f64 (*.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64))))) (sqrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 (cbrt.f64 (*.f64 -180 x-scale)) (pow.f64 (cbrt.f64 (*.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) 2)) (cbrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 -180 (/.f64 x-scale (cbrt.f64 (*.f64 angle (*.f64 (PI.f64) y-scale))))) (pow.f64 (cbrt.f64 (*.f64 angle (*.f64 (PI.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((/.f64 (*.f64 -180 (/.f64 x-scale (PI.f64))) (*.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((pow.f64 (*.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((pow.f64 (sqrt.f64 (*.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((pow.f64 (cbrt.f64 (*.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((pow.f64 (pow.f64 (*.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((sqrt.f64 (pow.f64 (*.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((log.f64 (pow.f64 (exp.f64 (/.f64 x-scale (*.f64 angle (*.f64 (PI.f64) y-scale)))) -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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 (/.f64 -180 (*.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((cbrt.f64 (pow.f64 (*.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((expm1.f64 (log1p.f64 (*.f64 (/.f64 -180 (*.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((exp.f64 (log.f64 (*.f64 (/.f64 -180 (*.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)) ((log1p.f64 (expm1.f64 (*.f64 (/.f64 -180 (*.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 -180 (/.f64 x-scale (*.f64 y-scale (*.f64 angle (PI.f64)))))) #f)))

simplify81.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

868×	`associate-/l*`
748×	`distribute-lft-neg-out`
742×	`distribute-frac-neg`
724×	`distribute-rgt-neg-out`
532×	`distribute-lft-neg-in`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	312	4251
1	808	4245
2	3635	4245

Stop Event

1×	node limit

Counts

111 → 173

Calls

Call 1

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

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

localize62.0ms (0%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	88.4%	(/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))
✓	86.0%	(.f64 (.f64 (PI.f64) (+.f64 b a)) (*.f64 y-scale y-scale))
✓	71.8%	(.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (*.f64 a a))))
✓	67.6%	(/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (*.f64 a a))

Compiler

Compiled 239 to 58 computations (75.7% saved)

series173.0ms (0.1%)

Counts

4 → 180

Calls

45 calls:

Time	Variable		Point	Expression
95.0ms	x-scale	@	0	(.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (*.f64 a a))))
40.0ms	a	@	inf	(/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))
5.0ms	b	@	0	(.f64 (.f64 (PI.f64) (+.f64 b a)) (*.f64 y-scale y-scale))
2.0ms	b	@	inf	(.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (*.f64 a a))))
2.0ms	b	@	inf	(/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))

rewrite202.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

518×	`add-sqr-sqrt`
512×	`pow1`
512×	`*-un-lft-identity`
478×	`add-exp-log`
478×	`add-log-exp`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	22	216
1	496	210
2	7986	210

Stop Event

1×	node limit

Counts

4 → 194

Calls

Call 1

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

Outputs
(((-.f64 (exp.f64 (log1p.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((-.f64 (/.f64 b (.f64 (/.f64 a (.f64 (PI.f64) (.f64 (+.f64 b a) y-scale))) (/.f64 a y-scale))) (/.f64 a (.f64 (/.f64 a (.f64 (PI.f64) (.f64 (+.f64 b 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale))) (pow.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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (-.f64 b a) (/.f64 1 (.f64 (/.f64 a (.f64 (PI.f64) (.f64 (+.f64 b 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale))) (.f64 (-.f64 b a) (pow.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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale)))) (pow.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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 1 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) (.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) (pow.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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (cbrt.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2)) (pow.f64 (cbrt.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2)) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (pow.f64 (cbrt.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2)) 2) (cbrt.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (pow.f64 (cbrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale))))) 2) (.f64 (cbrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale))))) (pow.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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))) (.f64 (.f64 y-scale y-scale) (pow.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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale))) (/.f64 a (-.f64 b a))) (/.f64 1 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 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (pow.f64 a -2) (.f64 (-.f64 b a) (.f64 (PI.f64) (.f64 (+.f64 b 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (-.f64 b a) a) (/.f64 (PI.f64) (/.f64 a (.f64 (+.f64 b 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (PI.f64) (/.f64 a (.f64 (+.f64 b a) (.f64 y-scale y-scale)))) (/.f64 (-.f64 b 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 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (.f64 (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale))) (neg.f64 (-.f64 b a))) (/.f64 1 (.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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (-.f64 b a) 1) (/.f64 (.f64 (PI.f64) (.f64 (+.f64 b a) (.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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale))) 1) (/.f64 (-.f64 b a) (.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 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 1 a) (/.f64 (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale))) (/.f64 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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 1 (cbrt.f64 (pow.f64 a 4))) (/.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale)))) (pow.f64 (cbrt.f64 a) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (-.f64 b a) (.f64 a a)) (.f64 (PI.f64) (.f64 (+.f64 b 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (-.f64 b a) (cbrt.f64 (pow.f64 a 4))) (/.f64 (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale))) (pow.f64 (cbrt.f64 a) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale))) (cbrt.f64 (pow.f64 a 4))) (/.f64 (-.f64 b a) (pow.f64 (cbrt.f64 a) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 1) (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) (cbrt.f64 (pow.f64 a 4))) (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) (pow.f64 (cbrt.f64 a) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale))))) 2) a) (/.f64 (cbrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (.f64 (+.f64 b 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale))))) 2) 1) (/.f64 (cbrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (.f64 (+.f64 b a) (.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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale))))) 2) (cbrt.f64 (pow.f64 a 4))) (cbrt.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))) a) (/.f64 (.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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))) 1) (/.f64 (.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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))) (cbrt.f64 (pow.f64 a 4))) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cbrt.f64 a) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((pow.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((pow.f64 (cbrt.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((pow.f64 (pow.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((pow.f64 (/.f64 (/.f64 (.f64 a a) (-.f64 b a)) (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale)))) -1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((neg.f64 (/.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale)))) (.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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((sqrt.f64 (pow.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((log.f64 (exp.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((cbrt.f64 (pow.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((cbrt.f64 (/.f64 (pow.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale)))) 3) (pow.f64 (.f64 a a) 3))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((expm1.f64 (log1p.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((exp.f64 (log.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((exp.f64 (.f64 (log.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2)) 1)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((log1p.f64 (expm1.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (/.f64 y-scale (.f64 (/.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) (.f64 x-scale 2)) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 y-scale (/.f64 angle (.f64 2 (/.f64 x-scale (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 y-scale (/.f64 (.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) angle) (.f64 x-scale 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 y-scale (.f64 angle (/.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) (.f64 x-scale 2)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 y-scale (.f64 (/.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) (.f64 x-scale 2)) angle)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<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 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (/.f64 y-scale angle) (/.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) (.f64 x-scale 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 x-scale (.f64 (/.f64 angle y-scale) (.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) 1/2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 x-scale (.f64 (.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) 1/2) (/.f64 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (.f64 x-scale 2) (.f64 (/.f64 angle y-scale) (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (.f64 x-scale 2) (.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) (/.f64 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (.f64 2 (/.f64 x-scale (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2))) (/.f64 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 1 (/.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) (.f64 (/.f64 y-scale angle) (.f64 x-scale 2)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 1 (/.f64 angle (/.f64 y-scale (/.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) (.f64 x-scale 2))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 1 (/.f64 (.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) angle) (.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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 1 (.f64 (/.f64 angle y-scale) (/.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) (.f64 x-scale 2)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 1 (.f64 (/.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) (.f64 x-scale 2)) (/.f64 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (.f64 (/.f64 y-scale angle) (.f64 x-scale 2)) (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (/.f64 y-scale (/.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) (.f64 x-scale 2))) angle) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<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 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (.f64 (.f64 y-scale x-scale) 2) (.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) angle)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<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 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (.f64 x-scale -2) (.f64 (/.f64 angle y-scale) (neg.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (neg.f64 y-scale) (.f64 (/.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) (.f64 x-scale 2)) (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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (.f64 (/.f64 y-scale angle) x-scale) (.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) 1/2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (.f64 y-scale x-scale) (.f64 angle (.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) 1/2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (.f64 y-scale (.f64 x-scale -2)) (.f64 angle (neg.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (.f64 (/.f64 y-scale angle) (.f64 x-scale -2)) (neg.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (.f64 (.f64 2 (/.f64 x-scale (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2))) (neg.f64 y-scale)) (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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (.f64 (neg.f64 y-scale) (.f64 x-scale 2)) (.f64 (neg.f64 angle) (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (.f64 (neg.f64 y-scale) (.f64 2 (/.f64 x-scale (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2)))) (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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (.f64 x-scale (/.f64 y-scale angle)) (.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) 1/2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (.f64 (.f64 x-scale -2) (/.f64 y-scale angle)) (neg.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (/.f64 (.f64 (/.f64 y-scale angle) (.f64 x-scale 2)) (.f64 (-.f64 b a) (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale))))) (pow.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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (/.f64 (.f64 (/.f64 y-scale angle) (.f64 x-scale 2)) 1) (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (/.f64 (.f64 (/.f64 y-scale angle) (.f64 x-scale 2)) (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a)) (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (/.f64 (.f64 (/.f64 y-scale angle) (.f64 x-scale 2)) (pow.f64 (cbrt.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2)) 2)) (cbrt.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (/.f64 (.f64 (/.f64 y-scale angle) (.f64 x-scale 2)) (/.f64 (-.f64 b a) a)) (/.f64 (PI.f64) (/.f64 a (.f64 (+.f64 b 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) (.f64 x-scale 2))) 1) angle) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<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 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) (.f64 x-scale 2))) (sqrt.f64 angle)) (sqrt.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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) (.f64 x-scale 2))) (pow.f64 (cbrt.f64 angle) 2)) (cbrt.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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (.f64 (neg.f64 y-scale) 1) (.f64 (neg.f64 angle) (/.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) (.f64 x-scale 2)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (.f64 (.f64 x-scale -2) 1) (.f64 (neg.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2)) (/.f64 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (.f64 (neg.f64 y-scale) x-scale) (.f64 (neg.f64 angle) (.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) 1/2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (.f64 (neg.f64 y-scale) (.f64 x-scale -2)) (.f64 (neg.f64 angle) (neg.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (.f64 x-scale y-scale) (.f64 (.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) 1/2) angle)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<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 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (.f64 x-scale (neg.f64 y-scale)) (.f64 (.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) 1/2) (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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (.f64 (.f64 x-scale 2) (neg.f64 y-scale)) (.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) (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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (.f64 (.f64 x-scale -2) y-scale) (.f64 (neg.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2)) angle)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<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 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (.f64 (.f64 x-scale -2) (neg.f64 y-scale)) (.f64 (neg.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2)) (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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (neg.f64 (.f64 (/.f64 y-scale angle) (.f64 x-scale 2))) (neg.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (neg.f64 (/.f64 y-scale (/.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) (.f64 x-scale 2)))) (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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((/.f64 (neg.f64 (.f64 (.f64 y-scale x-scale) 2)) (neg.f64 (.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) angle))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<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 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((pow.f64 (/.f64 y-scale (.f64 (/.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) (.f64 x-scale 2)) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((pow.f64 (/.f64 (sqrt.f64 (.f64 (/.f64 y-scale angle) (.f64 x-scale 2))) (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((pow.f64 (cbrt.f64 (/.f64 y-scale (.f64 (/.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) (.f64 x-scale 2)) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((pow.f64 (pow.f64 (/.f64 y-scale (.f64 (/.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) (.f64 x-scale 2)) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((sqrt.f64 (pow.f64 (/.f64 y-scale (.f64 (/.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) (.f64 x-scale 2)) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((log.f64 (pow.f64 (exp.f64 (/.f64 y-scale angle)) (.f64 2 (/.f64 x-scale (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (/.f64 y-scale (.f64 (/.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) (.f64 x-scale 2)) angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<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 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((cbrt.f64 (pow.f64 (/.f64 y-scale (.f64 (/.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) (.f64 x-scale 2)) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((cbrt.f64 (.f64 (pow.f64 (/.f64 y-scale angle) 3) (pow.f64 (.f64 2 (/.f64 x-scale (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((cbrt.f64 (.f64 (pow.f64 (.f64 2 (/.f64 x-scale (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2))) 3) (pow.f64 (/.f64 y-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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((expm1.f64 (log1p.f64 (/.f64 y-scale (.f64 (/.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) (.f64 x-scale 2)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<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 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((exp.f64 (log.f64 (/.f64 y-scale (.f64 (/.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) (.f64 x-scale 2)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<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 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((exp.f64 (.f64 (log.f64 (/.f64 y-scale (.f64 (/.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) (.f64 x-scale 2)) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((log1p.f64 (expm1.f64 (/.f64 y-scale (.f64 (/.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) (.f64 x-scale 2)) angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<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 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)))
(((+.f64 (.f64 (.f64 y-scale y-scale) (.f64 b (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((+.f64 (.f64 (.f64 y-scale y-scale) (.f64 a (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 b (PI.f64)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<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 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((+.f64 (.f64 (.f64 b (PI.f64)) (.f64 y-scale y-scale)) (.f64 (.f64 a (PI.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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((+.f64 (.f64 (.f64 a (PI.f64)) (.f64 y-scale y-scale)) (.f64 (.f64 b (PI.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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((-.f64 (exp.f64 (log1p.f64 (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale))))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((pow.f64 (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((pow.f64 (.f64 y-scale (sqrt.f64 (.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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((pow.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale 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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((pow.f64 (pow.f64 (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale))) 3) 1/3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((sqrt.f64 (.f64 (pow.f64 (.f64 (PI.f64) (+.f64 b a)) 2) (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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((log.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) (+.f64 b 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (.f64 (PI.f64) (.f64 (+.f64 b 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((cbrt.f64 (pow.f64 (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale 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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((cbrt.f64 (.f64 (pow.f64 (.f64 (PI.f64) (+.f64 b a)) 3) (pow.f64 (.f64 y-scale 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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((cbrt.f64 (.f64 (pow.f64 (.f64 y-scale y-scale) 3) (pow.f64 (.f64 (PI.f64) (+.f64 b 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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((expm1.f64 (log1p.f64 (.f64 (PI.f64) (.f64 (+.f64 b 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((exp.f64 (log.f64 (.f64 (PI.f64) (.f64 (+.f64 b 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((exp.f64 (.f64 (log.f64 (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale)))) 1)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((log1p.f64 (expm1.f64 (.f64 (PI.f64) (.f64 (+.f64 b 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (*.f64 a a)))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (.f64 2 (/.f64 x-scale (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2))))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (.f64 a a) (.f64 2 (/.f64 x-scale (.f64 (-.f64 b a) (.f64 (PI.f64) (.f64 (+.f64 b 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 x-scale (.f64 2 (/.f64 (/.f64 (.f64 a a) (-.f64 b a)) (.f64 (PI.f64) (.f64 (+.f64 b 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 x-scale (/.f64 1 (.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) 1/2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 2 (.f64 x-scale (/.f64 (/.f64 (.f64 a a) (-.f64 b a)) (.f64 (PI.f64) (.f64 (+.f64 b 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 2 (/.f64 x-scale (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (.f64 x-scale 2) (/.f64 (/.f64 (.f64 a a) (-.f64 b a)) (.f64 (PI.f64) (.f64 (+.f64 b 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (.f64 2 (/.f64 x-scale (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 1 (.f64 2 (/.f64 x-scale (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (sqrt.f64 (.f64 x-scale 2)) (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a)) (/.f64 (sqrt.f64 (.f64 x-scale 2)) (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (sqrt.f64 (.f64 x-scale 2)) (.f64 (sqrt.f64 (.f64 x-scale 2)) (/.f64 (/.f64 (.f64 a a) (-.f64 b a)) (.f64 (PI.f64) (.f64 (+.f64 b 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (cbrt.f64 (.f64 2 (/.f64 x-scale (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2)))) (pow.f64 (cbrt.f64 (.f64 2 (/.f64 x-scale (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2)))) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (pow.f64 (cbrt.f64 (.f64 2 (/.f64 x-scale (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2)))) 2) (cbrt.f64 (.f64 2 (/.f64 x-scale (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (cbrt.f64 (.f64 (.f64 x-scale x-scale) 4)) (.f64 (cbrt.f64 (.f64 x-scale 2)) (/.f64 (/.f64 (.f64 a a) (-.f64 b a)) (.f64 (PI.f64) (.f64 (+.f64 b 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (.f64 2 (/.f64 x-scale (.f64 (-.f64 b a) (.f64 (PI.f64) (.f64 (+.f64 b a) (.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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (/.f64 (.f64 a a) (-.f64 b a)) (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale)))) (.f64 x-scale 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (.f64 x-scale -2) (/.f64 1 (neg.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (.f64 (.f64 2 (/.f64 x-scale (.f64 (-.f64 b a) (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale)))))) 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 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (.f64 (.f64 2 (/.f64 x-scale (.f64 (-.f64 b a) (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale)))))) 1) (.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 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (.f64 (.f64 2 (/.f64 x-scale (.f64 (-.f64 b a) (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale)))))) (cbrt.f64 (pow.f64 a 4))) (pow.f64 (cbrt.f64 a) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (.f64 x-scale 2) 1) (/.f64 (/.f64 (.f64 a a) (-.f64 b a)) (.f64 (PI.f64) (.f64 (+.f64 b 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 1 (.f64 (-.f64 b a) (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale))))) (/.f64 (.f64 x-scale 2) (pow.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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 1 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 1 (pow.f64 (cbrt.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2)) 2)) (/.f64 (.f64 x-scale 2) (cbrt.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 1 (/.f64 (-.f64 b a) a)) (/.f64 (.f64 x-scale 2) (/.f64 (PI.f64) (/.f64 a (.f64 (+.f64 b 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (.f64 x-scale 2) (-.f64 b a)) (.f64 (/.f64 a (.f64 (PI.f64) (.f64 (+.f64 b 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 2 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a)) (/.f64 x-scale (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 x-scale (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2)) 2) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale))) (/.f64 a (-.f64 b 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 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (.f64 x-scale 2) (.f64 (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale))) (neg.f64 (-.f64 b a)))) (.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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 x-scale (.f64 (-.f64 b a) (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale))))) (/.f64 2 (pow.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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 x-scale 1) (/.f64 2 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 x-scale (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a)) (/.f64 2 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 x-scale (pow.f64 (cbrt.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2)) 2)) (/.f64 2 (cbrt.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 x-scale (/.f64 (-.f64 b a) a)) (/.f64 2 (/.f64 (PI.f64) (/.f64 a (.f64 (+.f64 b 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 2 (.f64 (-.f64 b a) (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale))))) (/.f64 x-scale (pow.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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 2 (pow.f64 (cbrt.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2)) 2)) (/.f64 x-scale (cbrt.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 2 (/.f64 (-.f64 b a) a)) (/.f64 x-scale (/.f64 (PI.f64) (/.f64 a (.f64 (+.f64 b 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (sqrt.f64 (.f64 x-scale 2)) (.f64 (-.f64 b a) (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 x-scale 2)) (pow.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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (sqrt.f64 (.f64 x-scale 2)) 1) (/.f64 (sqrt.f64 (.f64 x-scale 2)) (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (sqrt.f64 (.f64 x-scale 2)) (pow.f64 (cbrt.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2)) 2)) (/.f64 (sqrt.f64 (.f64 x-scale 2)) (cbrt.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (sqrt.f64 (.f64 x-scale 2)) (/.f64 (-.f64 b a) a)) (/.f64 (sqrt.f64 (.f64 x-scale 2)) (/.f64 (PI.f64) (/.f64 a (.f64 (+.f64 b 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 (.f64 x-scale x-scale) 4)) (.f64 (-.f64 b a) (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale))))) (/.f64 (cbrt.f64 (.f64 x-scale 2)) (pow.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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 (.f64 x-scale x-scale) 4)) 1) (/.f64 (cbrt.f64 (.f64 x-scale 2)) (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 (.f64 x-scale x-scale) 4)) (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a)) (/.f64 (cbrt.f64 (.f64 x-scale 2)) (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 (.f64 x-scale x-scale) 4)) (pow.f64 (cbrt.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2)) 2)) (cbrt.f64 (.f64 2 (/.f64 x-scale (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 (.f64 x-scale x-scale) 4)) (/.f64 (-.f64 b a) a)) (/.f64 (cbrt.f64 (.f64 x-scale 2)) (/.f64 (PI.f64) (/.f64 a (.f64 (+.f64 b 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((pow.f64 (.f64 2 (/.f64 x-scale (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((pow.f64 (/.f64 (sqrt.f64 (.f64 x-scale 2)) (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((pow.f64 (cbrt.f64 (.f64 2 (/.f64 x-scale (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((pow.f64 (pow.f64 (.f64 2 (/.f64 x-scale (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((pow.f64 (/.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2) (.f64 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 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((neg.f64 (/.f64 (.f64 x-scale 2) (neg.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((sqrt.f64 (pow.f64 (.f64 2 (/.f64 x-scale (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2))) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((log.f64 (exp.f64 (.f64 2 (/.f64 x-scale (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (.f64 2 (/.f64 x-scale (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((cbrt.f64 (pow.f64 (.f64 2 (/.f64 x-scale (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((cbrt.f64 (/.f64 (pow.f64 (.f64 x-scale 2) 3) (pow.f64 (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((expm1.f64 (log1p.f64 (.f64 2 (/.f64 x-scale (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((exp.f64 (log.f64 (.f64 2 (/.f64 x-scale (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((exp.f64 (.f64 (log.f64 (.f64 2 (/.f64 x-scale (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) a) 2)))) 1)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)) ((log1p.f64 (expm1.f64 (.f64 2 (/.f64 x-scale (pow.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) y-scale) 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 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (PI.f64) (+.f64 b a)) (.f64 y-scale y-scale))) (.f64 a a)))) #f)))

simplify214.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

1252×	`associate-*r/`
1072×	`associate-*l/`
668×	`associate-/r/`
600×	`*-commutative`
532×	`associate-/l/`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	838	30480
1	2958	27924

Stop Event

1×	node limit

Counts

374 → 454

Calls

Call 1

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

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

localize55.0ms (0%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	99.7%	(pow.f64 (/.f64 y-scale x-scale) 2)
✓	96.6%	(/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))))
✓	58.4%	(tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))
✓	48.2%	(/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale))

Compiler

Compiled 110 to 62 computations (43.6% saved)

series18.0ms (0%)

Counts

4 → 96

Calls

24 calls:

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

rewrite220.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

586×	`distribute-lft-neg-in`
506×	`distribute-rgt-neg-in`
396×	`add-sqr-sqrt`
384×	`*-un-lft-identity`
382×	`pow1`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	18	114
1	389	70
2	5608	70

Stop Event

1×	node limit

Counts

4 → 333

Calls

Call 1

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

Outputs
(((+.f64 0 (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((+.f64 (-.f64 0 (exp.f64 (log1p.f64 (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((+.f64 (-.f64 0 (/.f64 0 (/.f64 y-scale x-scale))) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((+.f64 (-.f64 (/.f64 0 (/.f64 y-scale x-scale)) 0) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((+.f64 (-.f64 (/.f64 0 (/.f64 y-scale x-scale)) (exp.f64 (log1p.f64 (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((+.f64 (-.f64 (/.f64 0 (/.f64 y-scale x-scale)) (/.f64 0 (/.f64 y-scale x-scale))) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((+.f64 (.f64 (/.f64 x-scale y-scale) 0) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((+.f64 (.f64 0 (/.f64 x-scale y-scale)) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((-.f64 0 (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((-.f64 (exp.f64 (log1p.f64 (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((-.f64 (/.f64 0 (/.f64 y-scale x-scale)) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 y-scale (neg.f64 (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 y-scale (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 y-scale (neg.f64 (neg.f64 (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 x-scale (/.f64 (pow.f64 (/.f64 y-scale x-scale) 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 y-scale x-scale) (.f64 (/.f64 y-scale x-scale) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 1 (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (sqrt.f64 y-scale) (.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (sqrt.f64 y-scale) (neg.f64 (.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 4)) (.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 4)) (neg.f64 (.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (pow.f64 (cbrt.f64 y-scale) 2) (.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (pow.f64 (cbrt.f64 y-scale) 2) (neg.f64 (.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 -1 (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 1 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 1 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 x-scale y-scale) (pow.f64 (/.f64 y-scale x-scale) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 y-scale) (neg.f64 (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 y-scale) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 y-scale) (neg.f64 (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 x-scale) (/.f64 (pow.f64 (/.f64 y-scale x-scale) 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 4))) (sqrt.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 4))) (neg.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (sqrt.f64 -1) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) y-scale) 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) y-scale) 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) y-scale) (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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) y-scale) (sqrt.f64 x-scale)) (neg.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) y-scale) (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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) y-scale) (pow.f64 (cbrt.f64 x-scale) 2)) (neg.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 1 (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>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 1 (sqrt.f64 x-scale)) (neg.f64 (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 1 (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>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 1 (pow.f64 (cbrt.f64 x-scale) 2)) (neg.f64 (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) 1) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (/.f64 y-scale x-scale) 1) (/.f64 (/.f64 y-scale x-scale) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (/.f64 y-scale x-scale) 1) (neg.f64 (/.f64 (/.f64 y-scale x-scale) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 1 y-scale) (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 1 y-scale) (neg.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 1 (sqrt.f64 (/.f64 y-scale x-scale))) (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 1 (sqrt.f64 (/.f64 y-scale x-scale))) (neg.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 1 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2))) (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 1 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2))) (neg.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (/.f64 y-scale x-scale) (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2))) (/.f64 (/.f64 y-scale x-scale) (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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (/.f64 y-scale x-scale) (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2))) (neg.f64 (/.f64 (/.f64 y-scale x-scale) (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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (sqrt.f64 y-scale)) (.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (pow.f64 (cbrt.f64 y-scale) 2)) (.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 1 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (/.f64 y-scale x-scale) y-scale) (/.f64 (/.f64 y-scale 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (/.f64 y-scale x-scale) y-scale) (neg.f64 (/.f64 (/.f64 y-scale 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 4)) 1) (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 4)) 1) (neg.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (sqrt.f64 y-scale) 1) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (sqrt.f64 y-scale) 1) (neg.f64 (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (sqrt.f64 y-scale) (pow.f64 (cbrt.f64 x-scale) 2)) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (sqrt.f64 y-scale) (pow.f64 (cbrt.f64 x-scale) 2)) (neg.f64 (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) 1) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) 1) (neg.f64 (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (sqrt.f64 x-scale)) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (sqrt.f64 x-scale)) (neg.f64 (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (pow.f64 (cbrt.f64 x-scale) 2)) (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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 4)) y-scale) (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 4)) y-scale) (neg.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 4)) (sqrt.f64 (/.f64 y-scale x-scale))) (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 4)) (sqrt.f64 (/.f64 y-scale x-scale))) (neg.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 4)) (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2))) (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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 -1 y-scale) (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 -1 y-scale) (neg.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 -1 (sqrt.f64 (/.f64 y-scale x-scale))) (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 -1 (sqrt.f64 (/.f64 y-scale x-scale))) (neg.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 -1 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2))) (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 -1 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2))) (neg.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 4)))) (sqrt.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) 1)) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (sqrt.f64 -1)) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 1 (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>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 1 (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>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 (/.f64 y-scale x-scale) 1)) (/.f64 (/.f64 y-scale x-scale) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 1 y-scale)) (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 1 (sqrt.f64 (/.f64 y-scale x-scale)))) (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 1 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)))) (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 (/.f64 y-scale x-scale) (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)))) (/.f64 (/.f64 y-scale x-scale) (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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 (/.f64 y-scale x-scale) y-scale)) (/.f64 (/.f64 y-scale 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 4)) 1)) (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 (sqrt.f64 y-scale) 1)) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 (sqrt.f64 y-scale) (pow.f64 (cbrt.f64 x-scale) 2))) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) 1)) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (sqrt.f64 x-scale))) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (pow.f64 (cbrt.f64 x-scale) 2))) (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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 4)) y-scale)) (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 4)) (sqrt.f64 (/.f64 y-scale x-scale)))) (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 4)) (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)))) (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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 -1 y-scale)) (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 -1 (sqrt.f64 (/.f64 y-scale x-scale)))) (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 -1 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)))) (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((pow.f64 (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((pow.f64 (pow.f64 (/.f64 y-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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((pow.f64 (sqrt.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((pow.f64 (cbrt.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((pow.f64 (pow.f64 (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((pow.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((neg.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((sqrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((fabs.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((log.f64 (exp.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((log.f64 (+.f64 1 (expm1.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((cbrt.f64 (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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((cbrt.f64 (/.f64 (pow.f64 (pow.f64 (/.f64 y-scale x-scale) 2) 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((cbrt.f64 (/.f64 (pow.f64 y-scale 3) (pow.f64 x-scale 3))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((expm1.f64 (log1p.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((exp.f64 (log.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((log1p.f64 (expm1.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)))
(((-.f64 (exp.f64 (log1p.f64 (tan.f64 (.f64 (PI.f64) (.f64 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (tan.f64 (.f64 (PI.f64) (.f64 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (neg.f64 (neg.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2) (neg.f64 (neg.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 -1 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (sqrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (neg.f64 (sqrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (.f64 (cbrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (cbrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (neg.f64 (cbrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (neg.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2)) (neg.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (sqrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (sqrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (.f64 (cbrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (cbrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) (cbrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (neg.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (neg.f64 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2))) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((/.f64 1 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((pow.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((pow.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((neg.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((sqrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((log.f64 (exp.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((log.f64 (+.f64 1 (expm1.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((expm1.f64 (log1p.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((exp.f64 (log.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((exp.f64 (.f64 (log.f64 (tan.f64 (.f64 (PI.f64) (.f64 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((log1p.f64 (expm1.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)))
(((+.f64 (-.f64 (/.f64 0 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (exp.f64 (log1p.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((+.f64 (-.f64 (/.f64 0 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 0 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((-.f64 (exp.f64 (log1p.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((-.f64 (/.f64 0 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 y-scale x-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 y-scale x-scale) (/.f64 1 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 y-scale x-scale) (neg.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 y-scale x-scale) (neg.f64 (/.f64 1 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (.f64 (/.f64 x-scale y-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (/.f64 1 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (neg.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (neg.f64 (/.f64 1 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 (/.f64 y-scale x-scale) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (neg.f64 (/.f64 (/.f64 y-scale x-scale) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 1 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (sqrt.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (sqrt.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (sqrt.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (neg.f64 (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (cbrt.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (pow.f64 (cbrt.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (cbrt.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (neg.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) 2) (cbrt.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) 2) (neg.f64 (cbrt.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (neg.f64 (.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) y-scale) (.f64 x-scale (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) y-scale) (neg.f64 (.f64 x-scale (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 -1 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 angle 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) 1) (/.f64 (/.f64 x-scale y-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) 1) (neg.f64 (/.f64 (/.f64 x-scale y-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 1 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 (/.f64 y-scale x-scale) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 1 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (neg.f64 (/.f64 (/.f64 y-scale x-scale) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 1 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2)) (/.f64 (/.f64 y-scale x-scale) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 1 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2)) (neg.f64 (/.f64 (/.f64 y-scale x-scale) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 4)) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 4)) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (neg.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 -1 (tan.f64 (.f64 (PI.f64) (.f64 angle 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 (/.f64 x-scale y-scale) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (neg.f64 (/.f64 (/.f64 x-scale y-scale) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2)) (/.f64 (/.f64 x-scale y-scale) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2)) (neg.f64 (/.f64 (/.f64 x-scale y-scale) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2)) (/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2)) (neg.f64 (/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (neg.f64 (/.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2)) (cbrt.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2)) (neg.f64 (cbrt.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) y-scale) 1) (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) y-scale) 1) (neg.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) y-scale) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 x-scale (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) y-scale) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (neg.f64 (/.f64 x-scale (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) y-scale) (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2)) (/.f64 x-scale (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) y-scale) (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2)) (neg.f64 (/.f64 x-scale (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) 1) (/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) 1) (neg.f64 (/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) 1) (/.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) 1) (neg.f64 (/.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (sqrt.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (sqrt.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (cbrt.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (pow.f64 (cbrt.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) 2)) (cbrt.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 angle 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) 1)) (/.f64 (/.f64 x-scale y-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 1 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (/.f64 (/.f64 y-scale x-scale) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 1 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2))) (/.f64 (/.f64 y-scale x-scale) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 4)) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 -1 (tan.f64 (.f64 (PI.f64) (.f64 angle 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (/.f64 (/.f64 x-scale y-scale) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2))) (/.f64 (/.f64 x-scale y-scale) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2))) (/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (/.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2))) (cbrt.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) y-scale) 1)) (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) y-scale) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (/.f64 x-scale (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) y-scale) (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2))) (/.f64 x-scale (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) 1)) (/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) 1)) (/.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((pow.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((pow.f64 (sqrt.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((pow.f64 (cbrt.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((pow.f64 (pow.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((pow.f64 (.f64 (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((neg.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((sqrt.f64 (pow.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((log.f64 (exp.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((log.f64 (+.f64 1 (expm1.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((cbrt.f64 (pow.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((cbrt.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 3) (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((expm1.f64 (log1p.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((exp.f64 (log.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((exp.f64 (.f64 (log.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((log1p.f64 (expm1.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)))
(((+.f64 (pow.f64 (/.f64 y-scale x-scale) 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((+.f64 0 (pow.f64 (/.f64 y-scale x-scale) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((+.f64 (-.f64 0 (exp.f64 (log1p.f64 (pow.f64 (/.f64 y-scale x-scale) 2)))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((-.f64 0 (pow.f64 (/.f64 y-scale x-scale) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((-.f64 (exp.f64 (log1p.f64 (pow.f64 (/.f64 y-scale x-scale) 2))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((-.f64 (+.f64 0 (exp.f64 (log1p.f64 (pow.f64 (/.f64 y-scale x-scale) 2)))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 y-scale (.f64 (/.f64 1 x-scale) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 y-scale (neg.f64 (.f64 (/.f64 1 x-scale) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 y-scale x-scale) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (pow.f64 (/.f64 y-scale x-scale) 2) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (pow.f64 (/.f64 y-scale x-scale) 2) -1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (.f64 (/.f64 x-scale y-scale) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (neg.f64 (.f64 (/.f64 x-scale y-scale) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 1 (pow.f64 (/.f64 y-scale x-scale) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (neg.f64 (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 4)) (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (cbrt.f64 (pow.f64 (/.f64 y-scale 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (neg.f64 (.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (pow.f64 (/.f64 y-scale x-scale) 4) (.f64 (/.f64 x-scale y-scale) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (pow.f64 (/.f64 y-scale x-scale) 4) (neg.f64 (.f64 (/.f64 x-scale y-scale) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (pow.f64 (/.f64 y-scale x-scale) 3) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (.f64 y-scale y-scale) (.f64 (/.f64 1 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 1 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (.f64 y-scale y-scale) (neg.f64 (.f64 (/.f64 1 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (.f64 y-scale y-scale) (neg.f64 (pow.f64 (/.f64 1 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) y-scale) (.f64 x-scale (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) y-scale) (neg.f64 (.f64 x-scale (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 -1 (pow.f64 (/.f64 y-scale x-scale) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (neg.f64 y-scale) (.f64 (/.f64 1 x-scale) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (.f64 (/.f64 y-scale x-scale) (sqrt.f64 (/.f64 y-scale x-scale))) (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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) y-scale) (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) y-scale)) (.f64 x-scale x-scale)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) y-scale) (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) y-scale)) (.f64 (neg.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (.f64 (/.f64 y-scale x-scale) 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (.f64 (/.f64 y-scale x-scale) y-scale) (neg.f64 (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (.f64 (/.f64 y-scale x-scale) (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 2))) (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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (.f64 (neg.f64 y-scale) y-scale) (.f64 (/.f64 1 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((.f64 (.f64 (neg.f64 y-scale) y-scale) (pow.f64 (/.f64 1 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((/.f64 y-scale (.f64 x-scale (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((/.f64 y-scale (.f64 (/.f64 x-scale 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((/.f64 (/.f64 y-scale x-scale) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (.f64 (/.f64 y-scale x-scale) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (.f64 (/.f64 x-scale y-scale) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((/.f64 1 (.f64 (/.f64 x-scale y-scale) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((/.f64 (pow.f64 (/.f64 y-scale x-scale) 4) (pow.f64 (/.f64 y-scale x-scale) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((/.f64 (pow.f64 (/.f64 y-scale x-scale) 3) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((/.f64 (neg.f64 y-scale) (.f64 (/.f64 x-scale 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((/.f64 (neg.f64 y-scale) (.f64 (neg.f64 x-scale) (/.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((/.f64 (.f64 (neg.f64 y-scale) (neg.f64 y-scale)) (.f64 (neg.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((/.f64 (.f64 (/.f64 y-scale x-scale) 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((/.f64 (.f64 (/.f64 y-scale x-scale) (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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((/.f64 (.f64 y-scale (/.f64 y-scale 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((/.f64 (.f64 (neg.f64 y-scale) (/.f64 y-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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((/.f64 (-.f64 0 (pow.f64 (/.f64 y-scale x-scale) 4)) (pow.f64 (/.f64 y-scale x-scale) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((/.f64 (-.f64 0 (pow.f64 (pow.f64 (/.f64 y-scale x-scale) 2) 3)) (+.f64 (pow.f64 (/.f64 y-scale x-scale) 4) 0)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((/.f64 (.f64 y-scale (neg.f64 y-scale)) (.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((/.f64 (.f64 (neg.f64 y-scale) y-scale) (.f64 (neg.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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((sqrt.f64 (pow.f64 (/.f64 y-scale 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 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((log.f64 (exp.f64 (pow.f64 (/.f64 y-scale x-scale) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((log.f64 (+.f64 1 (expm1.f64 (pow.f64 (/.f64 y-scale x-scale) 2)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((cbrt.f64 (pow.f64 (pow.f64 (/.f64 y-scale x-scale) 2) 3)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((expm1.f64 (log1p.f64 (pow.f64 (/.f64 y-scale x-scale) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((exp.f64 (log.f64 (pow.f64 (/.f64 y-scale x-scale) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((exp.f64 (.f64 (log.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) 1)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)) ((log1p.f64 (expm1.f64 (pow.f64 (/.f64 y-scale x-scale) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) (pow.f64 (/.f64 y-scale x-scale) 2)) #f)))

simplify150.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

1852×	`associate-/l*`
1676×	`associate-/r*`
1240×	`*-commutative`
550×	`associate-/l/`
476×	`distribute-lft-in`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	751	15077
1	2354	14853

Stop Event

1×	node limit

Counts

429 → 482

Calls

Call 1

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

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

localize47.0ms (0%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
	99.4%	(.f64 (PI.f64) (.f64 1/180 angle))
✓	99.2%	(pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2)
✓	72.5%	(cbrt.f64 (/.f64 y-scale x-scale))
✓	57.9%	(tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))

Compiler

Compiled 113 to 58 computations (48.7% saved)

series9.0ms (0%)

Counts

3 → 12

Calls

15 calls:

Time	Variable		Point	Expression
4.0ms	x-scale	@	0	(pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2)
0.0ms	y-scale	@	-inf	(pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2)
0.0ms	y-scale	@	-inf	(cbrt.f64 (/.f64 y-scale x-scale))
0.0ms	x-scale	@	-inf	(pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2)
0.0ms	x-scale	@	-inf	(cbrt.f64 (/.f64 y-scale x-scale))

rewrite133.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

952×	`swap-sqr`
812×	`associate-*r/`
664×	`associate-/r*`
614×	`associate-*l/`
500×	`associate-/l*`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	16	47
1	326	47
2	3839	47

Stop Event

1×	node limit

Counts

3 → 142

Calls

Call 1

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

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

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

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

simplify87.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

1890×	`unswap-sqr`
1050×	`associate-/l/`
806×	`distribute-lft-in`
802×	`distribute-rgt-in`
770×	`associate-/r/`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	367	4936
1	769	4774
2	3117	4726

Stop Event

1×	node limit

Counts

154 → 223

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

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

eval1.1s (0.7%)

Compiler: Compiled 61910 to 33878 computations (45.3% saved)

prune1.3s (0.9%)

Pruning

126 alts after pruning (125 fresh and 1 done)

	Pruned	Kept	Total
New	1848	63	1911
Fresh	25	62	87
Picked	1	0	1
Done	4	1	5
Total	1878	126	2004

Accurracy

86.6%

Counts

2004 → 126

Alt Table

Click to see full alt table

Status	Accuracy	Program
	39.4%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (pow.f64 (pow.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) 3) 1/3)))
	35.1%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))) 3)))
	19.0%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (pow.f64 (/.f64 (cbrt.f64 (sqrt.f64 y-scale)) (/.f64 (cbrt.f64 x-scale) (cbrt.f64 (sqrt.f64 y-scale)))) 2) (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (cbrt.f64 (/.f64 y-scale x-scale))))))
	15.4%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (pow.f64 (.f64 (cbrt.f64 y-scale) (pow.f64 (pow.f64 x-scale -1) 1/3)) 2) (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cbrt.f64 (/.f64 y-scale x-scale))))))
	35.7%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 3) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
	37.1%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (/.f64 (tan.f64 (pow.f64 (cbrt.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 3)) (cbrt.f64 (/.f64 y-scale x-scale))))))
	49.1%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (neg.f64 (cbrt.f64 (/.f64 y-scale x-scale)))))))
	24.1%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (/.f64 (tan.f64 (expm1.f64 (log1p.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (cbrt.f64 (/.f64 y-scale x-scale))))))
	34.7%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (/.f64 (log1p.f64 (expm1.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (cbrt.f64 (/.f64 y-scale x-scale))))))
	33.3%	(.f64 (/.f64 180 (PI.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)))))
	21.8%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (/.f64 (.f64 -180 (.f64 (.f64 y-scale b) b)) (.f64 angle x-scale)) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))
	18.2%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (/.f64 (sqrt.f64 y-scale) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 (sqrt.f64 y-scale) (cbrt.f64 x-scale))))))
	24.5%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (/.f64 y-scale x-scale)) (.f64 (PI.f64) (*.f64 1/180 angle)))))
	30.8%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (/.f64 (neg.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 3) (/.f64 y-scale x-scale))) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
	31.7%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (/.f64 (neg.f64 (/.f64 (.f64 (/.f64 y-scale x-scale) y-scale) x-scale)) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
	25.8%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (/.f64 (neg.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
	32.8%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (/.f64 (neg.f64 (/.f64 y-scale (.f64 (/.f64 x-scale y-scale) x-scale))) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
	16.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (/.f64 (neg.f64 (.f64 (pow.f64 (/.f64 y-scale x-scale) 4) (.f64 (/.f64 x-scale y-scale) (/.f64 x-scale y-scale)))) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
	15.9%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (/.f64 (neg.f64 (.f64 (.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) y-scale) (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) y-scale)) (.f64 (neg.f64 x-scale) x-scale))) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
	26.0%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (/.f64 (neg.f64 (.f64 (.f64 y-scale y-scale) (.f64 (/.f64 1 x-scale) (/.f64 1 x-scale)))) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
	22.5%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (/.f64 (neg.f64 (.f64 (neg.f64 y-scale) (.f64 (/.f64 1 x-scale) (/.f64 y-scale x-scale)))) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
	31.7%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (/.f64 (neg.f64 (exp.f64 (log.f64 (pow.f64 (/.f64 y-scale x-scale) 2)))) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
	29.8%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (/.f64 (neg.f64 (cbrt.f64 (pow.f64 (pow.f64 (/.f64 y-scale x-scale) 2) 3))) (/.f64 y-scale x-scale)) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
	48.6%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (/.f64 y-scale (neg.f64 x-scale)) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
	35.7%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
	33.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (/.f64 1 x-scale) (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) y-scale))))
	30.6%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (-.f64 (exp.f64 (log1p.f64 (/.f64 y-scale x-scale))) 1) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
	41.0%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) y-scale) (.f64 (pow.f64 (cbrt.f64 x-scale) 2) (cbrt.f64 x-scale))) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
	41.0%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) y-scale) x-scale) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
	35.7%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (.f64 (/.f64 (/.f64 y-scale x-scale) y-scale) (/.f64 (/.f64 y-scale x-scale) (/.f64 1 x-scale))) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
	50.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (.f64 (/.f64 -1 y-scale) (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (/.f64 1 x-scale))) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
	33.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (.f64 y-scale (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) x-scale)))
	46.7%	(.f64 (/.f64 180 (PI.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))))))))
	39.1%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (.f64 y-scale -180) (.f64 (PI.f64) (.f64 x-scale angle)))))
	48.1%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (neg.f64 y-scale) (.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (cbrt.f64 x-scale)) (pow.f64 (cbrt.f64 x-scale) 2)))))
	48.2%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (neg.f64 y-scale) (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))))
	41.5%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (log.f64 (exp.f64 (/.f64 y-scale x-scale))) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
	23.6%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (exp.f64 (log.f64 (/.f64 y-scale x-scale))) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
	40.1%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale x-scale) 3)) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
	36.2%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (/.f64 (.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (cbrt.f64 y-scale)))))
	33.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 y-scale (/.f64 x-scale (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))))
	33.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 y-scale (.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (cbrt.f64 x-scale)) (pow.f64 (cbrt.f64 x-scale) 2)))))
	33.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))))
	49.2%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 -1 (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale)))))
	49.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 -1 (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale y-scale)))))
	39.1%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 -180 (/.f64 (.f64 (*.f64 x-scale (PI.f64)) angle) y-scale))))
	40.7%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (+.f64 (.f64 -180 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))) (.f64 -1/1080 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale)))))
	33.1%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (+.f64 0 (/.f64 y-scale (.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale)))))
	34.9%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) y-scale) (.f64 x-scale (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))))))
	45.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 y-scale x-scale) 2)) (.f64 y-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) x-scale)))
	47.9%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 y-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
	47.8%	(.f64 (/.f64 180 (PI.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))))))))
	6.7%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (/.f64 (.f64 180 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (PI.f64) (.f64 (-.f64 (.f64 b b) (.f64 a a)) angle))))))
	18.7%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (/.f64 (.f64 -1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (-.f64 (.f64 b b) (*.f64 a a)))))))
	20.7%	(.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 1 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))))))))
	17.7%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (.f64 -1/2 (/.f64 (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 1 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))))))))))
	23.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (pow.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 1/6) 6)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
	50.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3)))))
✓	50.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
	50.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) (log1p.f64 (expm1.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))))
	47.2%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (pow.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) (cbrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3))))))
	46.7%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (.f64 (pow.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) 3) (cbrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
	48.0%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (.f64 (pow.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (cbrt.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 (cbrt.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
	49.7%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (.f64 (pow.f64 (cbrt.f64 (PI.f64)) 2) (.f64 (.f64 1/180 angle) (cbrt.f64 (PI.f64))))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
	50.4%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) angle) 1/180)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
	48.8%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (.f64 (.f64 1/180 (PI.f64)) (.f64 (pow.f64 (cbrt.f64 angle) 2) (cbrt.f64 angle)))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
	50.1%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 (cbrt.f64 (.f64 1/180 angle)) (pow.f64 (cbrt.f64 (.f64 1/180 angle)) 2)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
	42.4%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))
	25.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (pow.f64 (sqrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
	48.4%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (neg.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (pow.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3))))))
	39.1%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 -180 (/.f64 (/.f64 y-scale (*.f64 angle x-scale)) (PI.f64)))))
	39.1%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 -180 (/.f64 y-scale (.f64 (.f64 x-scale angle) (PI.f64))))))
	39.1%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 -180 (/.f64 y-scale (.f64 (.f64 angle (PI.f64)) x-scale)))))
	20.8%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 -180 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))
	37.7%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (neg.f64 (pow.f64 (pow.f64 (/.f64 y-scale (.f64 x-scale (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) 3) 1/3))))
	47.5%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (neg.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale (.f64 x-scale (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) 3))))
	47.6%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (neg.f64 (/.f64 (/.f64 y-scale (tan.f64 (.f64 (*.f64 1/180 (PI.f64)) angle))) x-scale))))
	48.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (neg.f64 (/.f64 y-scale (.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 (cbrt.f64 x-scale) (pow.f64 (cbrt.f64 x-scale) 2)))))))
	48.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (neg.f64 (/.f64 y-scale (.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
	37.7%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (neg.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (expm1.f64 (log1p.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))))))
	36.1%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (neg.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (expm1.f64 (log1p.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
	22.5%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (neg.f64 (.f64 (sqrt.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (sqrt.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))))))))))
	40.1%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (neg.f64 (.f64 180 (/.f64 (/.f64 y-scale x-scale) (*.f64 angle (PI.f64)))))))
	27.8%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (neg.f64 (exp.f64 (log.f64 (/.f64 y-scale (.f64 x-scale (tan.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))))))
	23.2%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (exp.f64 (log.f64 (/.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))))))
	7.1%	(.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)))
	12.2%	(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 angle (PI.f64)) -180))) (PI.f64)))
	12.2%	(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 x-scale -1/180) (.f64 angle (*.f64 (PI.f64) y-scale)))) (PI.f64)))
	12.3%	(*.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 -180 (/.f64 (PI.f64) (/.f64 x-scale angle))) y-scale)) (PI.f64)))
	12.2%	(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 -180 (/.f64 y-scale x-scale)) (.f64 angle (PI.f64)))) (PI.f64)))
	12.2%	(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 (/.f64 x-scale y-scale) -180) (*.f64 angle (PI.f64)))) (PI.f64)))
	12.3%	(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 (/.f64 -180 (*.f64 angle (PI.f64))) x-scale) y-scale)) (PI.f64)))
	12.3%	(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 (.f64 -180 x-scale) (/.f64 1 (.f64 angle (PI.f64)))) y-scale)) (PI.f64)))
	12.2%	(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 -180 (/.f64 x-scale (PI.f64))) (*.f64 y-scale angle))) (PI.f64)))
	9.6%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (/.f64 (.f64 (.f64 angle (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))) (PI.f64)))
	34.0%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale x-scale) (.f64 (/.f64 (/.f64 (.f64 b b) (.f64 angle (-.f64 b a))) (*.f64 (PI.f64) (+.f64 b a))) -2)))) (PI.f64)))
	9.4%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (/.f64 (/.f64 (.f64 -2 x-scale) (*.f64 y-scale y-scale)) (PI.f64))))) (PI.f64)))
	3.6%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 (.f64 (/.f64 x-scale (-.f64 b a)) 2) (.f64 a (/.f64 a y-scale))) (.f64 (PI.f64) (.f64 y-scale (+.f64 a b))))))) (PI.f64)))
	2.9%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 (.f64 (.f64 y-scale y-scale) a) (PI.f64))) (*.f64 a a)))))) (PI.f64)))
	6.3%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (-.f64 b a) (.f64 y-scale (.f64 y-scale (.f64 (PI.f64) b)))) (*.f64 a a)))))) (PI.f64)))
	7.0%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 x-scale 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (.f64 b b))) (*.f64 a a)))))) (PI.f64)))
	39.1%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (/.f64 -2 (.f64 x-scale (PI.f64)))))) (PI.f64)))
	4.8%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (/.f64 (neg.f64 a) (.f64 y-scale y-scale))))))) (PI.f64)))
	11.7%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (+.f64 (/.f64 (.f64 b b) (.f64 a (.f64 x-scale x-scale))) (-.f64 (.f64 -1 (+.f64 (/.f64 b (.f64 y-scale y-scale)) (/.f64 a (.f64 y-scale y-scale)))) (/.f64 (.f64 b b) (.f64 a (.f64 y-scale y-scale)))))))))) (PI.f64)))
	35.5%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (neg.f64 (/.f64 (.f64 b b) (.f64 (-.f64 b a) (.f64 x-scale x-scale))))))))) (PI.f64)))
	44.0%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (.f64 (/.f64 x-scale (PI.f64)) (.f64 (/.f64 2 (+.f64 a b)) (neg.f64 (/.f64 b (.f64 x-scale x-scale)))))))) (PI.f64)))
	3.6%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 y-scale angle) (.f64 (.f64 (.f64 2 (/.f64 x-scale (.f64 (-.f64 b a) (.f64 (PI.f64) (.f64 (+.f64 b a) (.f64 y-scale y-scale)))))) a) a)))) (PI.f64)))
	15.8%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 2 (/.f64 (/.f64 (.f64 (.f64 a a) x-scale) y-scale) (.f64 (.f64 angle (.f64 b b)) (PI.f64)))))) (PI.f64)))
	3.9%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 2 (/.f64 x-scale (/.f64 (.f64 (.f64 (PI.f64) angle) (-.f64 (.f64 b b) (.f64 a a))) (.f64 a (/.f64 a y-scale))))))) (PI.f64)))
	17.0%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 2 (/.f64 x-scale (/.f64 (.f64 y-scale (.f64 (.f64 angle (.f64 b b)) (PI.f64))) (.f64 a a)))))) (PI.f64)))
	21.4%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 y-scale (/.f64 (.f64 (.f64 x-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) (.f64 b b)))))) (PI.f64)))
	31.0%	(.f64 180 (/.f64 (atan.f64 (.f64 1/2 (/.f64 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 y-scale -2) (neg.f64 (pow.f64 (hypot.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale)) 2)))))))) (PI.f64)))
	47.4%	(.f64 180 (/.f64 (atan.f64 (.f64 1/2 (/.f64 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale (/.f64 (/.f64 -1 x-scale) x-scale)))))) (PI.f64)))
	14.6%	(.f64 180 (/.f64 (atan.f64 (.f64 1/2 (/.f64 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale (-.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)) (/.f64 (pow.f64 (exp.f64 (log.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) 2) (*.f64 y-scale y-scale))))))))) (PI.f64)))
	47.4%	(.f64 180 (/.f64 (atan.f64 (.f64 1/2 (/.f64 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) 2))))))) (PI.f64)))
	47.3%	(.f64 180 (/.f64 (atan.f64 (.f64 1/2 (/.f64 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale (neg.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))))))) (PI.f64)))
	32.6%	(.f64 180 (/.f64 (atan.f64 (.f64 1/2 (/.f64 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 1) (.f64 y-scale (-.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)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))))))))) (PI.f64)))
	29.2%	(.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 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)))) (pow.f64 (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2)) 3))))) (PI.f64)))
	22.1%	(.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 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)))) (expm1.f64 (log1p.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle))))) 2))))))) (PI.f64)))
	31.0%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.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 (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))))))) (PI.f64)))
	30.9%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (.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 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 0 (sin.f64 (.f64 (.f64 angle (PI.f64)) 1/90))))) (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)))))) (PI.f64)))
	47.7%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (PI.f64)))
	12.3%	(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 (/.f64 (/.f64 x-scale angle) (PI.f64)) y-scale))) (PI.f64)))
	7.7%	(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (fabs.f64 (.f64 (PI.f64) (.f64 y-scale angle)))))) (PI.f64)))
	12.2%	(.f64 180 (/.f64 (atan.f64 (.f64 -180 (.f64 (/.f64 1 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64))))) (PI.f64)))
	8.5%	(.f64 180 (/.f64 (atan.f64 (fabs.f64 (.f64 -180 (/.f64 (/.f64 (/.f64 x-scale angle) (PI.f64)) y-scale)))) (PI.f64)))

Compiler

Compiled 4020 to 2990 computations (25.6% saved)

regimes11.2s (7.4%)

Counts

237 → 3

Calls

Call 1

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

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

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

Calls

11 calls:

2.3s	(/.f64 angle 180)
2.0s	y-scale
1.9s	x-scale
1.5s	angle
1.4s	(*.f64 (/.f64 angle 180) (PI.f64))

Results

Accuracy	Segments	Branch
67.4%	3	`a`
66.3%	5	`b`
65.3%	9	`angle`
63.2%	10	`x-scale`
67.3%	12	`y-scale`
55.0%	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.0%	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.0%	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.0%	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))
65.3%	9	`(*.f64 (/.f64 angle 180) (PI.f64))`
65.3%	9	`(/.f64 angle 180)`

Compiler

Compiled 11999 to 7050 computations (41.2% saved)

bsearch1.2s (0.8%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
482.0ms	2.0021472856729423e-78	8.283684599172829e-77
682.0ms	-89.63834005215656	-0.003596010253153472

Results

444.0ms	39×	body	4096	valid
280.0ms	41×	body	2048	valid
252.0ms	48×	body	1024	valid
109.0ms	93×	body	256	valid
68.0ms	19×	body	512	valid

Compiler

Compiled 1037 to 801 computations (22.8% saved)

regimes3.1s (2.1%)

Counts

124 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

7 calls:

652.0ms	x-scale
512.0ms	y-scale
432.0ms	angle
424.0ms	(/.f64 angle 180)
418.0ms	(*.f64 (/.f64 angle 180) (PI.f64))

Results

Accuracy	Segments	Branch
67.2%	3	`a`
65.6%	5	`b`
62.2%	7	`angle`
60.8%	9	`x-scale`
63.3%	9	`y-scale`
62.2%	7	`(*.f64 (/.f64 angle 180) (PI.f64))`
62.2%	7	`(/.f64 angle 180)`

Compiler

Compiled 2956 to 1547 computations (47.7% saved)

bsearch1.5s (1%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
498.0ms	2.0021472856729423e-78	8.283684599172829e-77
1.0s	-89.63834005215656	-0.003596010253153472

Results

642.0ms	40×	body	2048	valid
439.0ms	39×	body	4096	valid
286.0ms	57×	body	1024	valid
120.0ms	88×	body	256	valid
46.0ms	16×	body	512	valid

Compiler

Compiled 1037 to 801 computations (22.8% saved)

regimes3.1s (2%)

Counts

122 → 3

Calls

Call 1

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

Outputs

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

(*.f64 (/.f64 180 (PI.f64)) (atan.f64 (neg.f64 (/.f64 (/.f64 y-scale (tan.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) x-scale))))

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

Calls

7 calls:

682.0ms	x-scale
549.0ms	(*.f64 (/.f64 angle 180) (PI.f64))
448.0ms	y-scale
426.0ms	(/.f64 angle 180)
407.0ms	angle

Results

Accuracy	Segments	Branch
66.8%	3	`a`
65.6%	5	`b`
62.2%	7	`angle`
62.3%	11	`x-scale`
61.4%	7	`y-scale`
62.2%	7	`(*.f64 (/.f64 angle 180) (PI.f64))`
62.2%	7	`(/.f64 angle 180)`

Compiler

Compiled 2910 to 1519 computations (47.8% saved)

bsearch1.1s (0.7%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
541.0ms	2.0021472856729423e-78	8.283684599172829e-77
547.0ms	-89.63834005215656	-0.003596010253153472

Results

333.0ms	32×	body	4096	valid
319.0ms	62×	body	1024	valid
248.0ms	36×	body	2048	valid
109.0ms	91×	body	256	valid
63.0ms	19×	body	512	valid

Compiler

Compiled 932 to 726 computations (22.1% saved)

regimes2.9s (1.9%)

Counts

119 → 3

Calls

Call 1

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

Outputs

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

(*.f64 (/.f64 180 (PI.f64)) (atan.f64 (neg.f64 (/.f64 y-scale (*.f64 x-scale (tan.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))

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

Calls

7 calls:

644.0ms	x-scale
603.0ms	y-scale
400.0ms	(/.f64 angle 180)
396.0ms	(*.f64 (/.f64 angle 180) (PI.f64))
375.0ms	angle

Results

Accuracy	Segments	Branch
66.0%	3	`a`
63.6%	3	`b`
62.2%	7	`angle`
63.2%	12	`x-scale`
63.0%	9	`y-scale`
62.2%	7	`(*.f64 (/.f64 angle 180) (PI.f64))`
62.2%	7	`(/.f64 angle 180)`

Compiler

Compiled 2843 to 1478 computations (48% saved)

bsearch1.0s (0.7%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
455.0ms	2.0021472856729423e-78	8.283684599172829e-77
557.0ms	-1.5506990644412658e+32	-6.364577081427695e+29

Results

362.0ms	34×	body	4096	valid
303.0ms	59×	body	1024	valid
172.0ms	29×	body	2048	valid
111.0ms	84×	body	256	valid
58.0ms	18×	body	512	valid

Compiler

Compiled 882 to 679 computations (23% saved)

regimes2.3s (1.6%)

Counts

118 → 10

Calls

Call 1

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

Outputs
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (.f64 (/.f64 -1 y-scale) (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (/.f64 1 x-scale))) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) y-scale) x-scale) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (neg.f64 y-scale) (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) y-scale) (.f64 x-scale (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))))))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (/.f64 y-scale (neg.f64 x-scale)) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (neg.f64 (/.f64 y-scale (.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (neg.f64 (fabs.f64 (/.f64 y-scale (.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (.f64 (/.f64 -1 y-scale) (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) (/.f64 1 x-scale))) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (/.f64 y-scale (neg.f64 x-scale)) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (/.f64 (.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 2) y-scale) x-scale) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))

Calls

7 calls:

527.0ms	x-scale
381.0ms	(*.f64 (/.f64 angle 180) (PI.f64))
377.0ms	angle
364.0ms	(/.f64 angle 180)
222.0ms	y-scale

Results

Accuracy	Segments	Branch
60.6%	3	`a`
57.9%	3	`b`
59.5%	6	`angle`
60.9%	10	`x-scale`
55.9%	4	`y-scale`
59.5%	6	`(*.f64 (/.f64 angle 180) (PI.f64))`
59.5%	6	`(/.f64 angle 180)`

Compiler

Compiled 2821 to 1466 computations (48% saved)

bsearch3.7s (2.5%)

Algorithm

8×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough
1×	narrow-enough
1×	predicate-same
1×	narrow-enough
1×	narrow-enough
1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
97.0ms	7.2485703152496e+177	2.276861897576999e+194
528.0ms	1.1594464684875881e+21	4.571679489855856e+22
388.0ms	1.3239751650042198e-192	3.714847086127991e-190
352.0ms	2.0069693735298702e-283	1.325397430222606e-279
210.0ms	-1.829904628334151e-254	-3.5269828640837226e-255
527.0ms	-1.0382500531461867e-149	-5.286034536629694e-167
550.0ms	-2.166978006180691e-80	-1.2331697634680163e-85
420.0ms	-7.261918370382245e-57	-9.01824200489979e-58
607.0ms	-0.3303664003730228	-1.1073020486503581e-7

Results

1.4s	262×	body	1024	valid
773.0ms	116×	body	2048	valid
598.0ms	55×	body	4096	valid
522.0ms	461×	body	256	valid
356.0ms	113×	body	512	valid

Compiler

Compiled 3350 to 2689 computations (19.7% saved)